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IDENTIFICATION 


PRODUCT CODE: AC-F612B-MC 

PRODUCT NAME: CKKTBBO 11/44 MEM MGMT PRT B 
DATE: DECEMBER, 1979 

MAINTAINER: DIAGNOSTIC ENGINEERING 

AUTHOR : J. PETER BRADY, DAN P. MILLEVILLE 


THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE WITHOUT 
NOTICE AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL 
EQUIPMENT CORPORATION. DIGITAL EQUIPMENT CORPORATION ASSUMES 


NO RESPONSIBILITY FOR ANY ERRORS THAT MAY APPEAR IN THIS 
DOCUMENT. 


THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER SYSTEM 
AND CAN BE COPIED (WITH INCLUSION OF DIGITAL'S COPYRIGHT NOTICE) 
ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY OTHERWISE BE PROVIDED 
IN WRITING BY DIGITAL. 


DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY 
FOR THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT 
THAT IS NOT SUPPLIED BY DIGITAL. 


COPYRIGHT  (C) 1979 BY DIGITAL EQUIPMENT CORPORATION 
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DATE REASON FOR REVISION 
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1.0 PROGRAM INFORMATION 


ABSTRACT 


THIS PROGRAM WAS DESIGNED USING A ‘BOTTOM UP’* APPROACH 
STARTING WITH THE SMALLEST SEGMENT OF MEMORY MANAGMENT 
LOGIC POSSIBLE AND BUILDING TO COVER ALL OF THE LOG 

THE DIAGNOSTIC WILL PROVIDE ENOUGH INFORMATION SUCH THAT 
BY DEDUCTION, THE FAILURE CAN BE ISOLATED TO A SMALL 
SEGMENT OF THE MEMORY MANAGEMENT LOGIC. 


PART A dy: BY TESTING SOME OF THE INTERNAL CPU DATA 
AND ADDRESS PATHS AND ADDRESS DETECTION LOGIC, N 
WORKS OUT BARD THROUGH ME. 
AFTER THE REGISTERS ARE FOUND TO BE USE 
te iy He, OF PHYSICAL ADDRESSES FROM A VIRTUAL ADDRESS 
AND THE ASSOCIATED PAR/PDR_ INFORMATION) IS TESTED. PART B 
HE ABORT AND STATUS SEGMENTS OF 


LOGIC. 
QUENCES, THE MFPI/MTPI 
INSTRUCTIONS AND THE CSM INSTRUCTION. 
REQUIREMENTS 


RSSSSSSSKGRLLG LSB 


— 
o 
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A PDP 11/44 PROCESSOR WITH A MINIMUM OF 16K OF MEMORY 
AND A CONSOLE TERMINAL ARE REQUIRED TO RUN THE PROGRAM 
UNLESS THE PROGRAM IS RUNNING UNDER APT OR ACT IN WHICH 
CASE THE CONSOLE TERMINAL IS NOT NECESSARY. 


RELATED DOCUMENTS AND STANDARDS 
ACT11/XXDP_ PROGRAMMING SPECIFICATION 
STANDARD APT SYSTEM TO A PDP11 DIAGNOSTIC INTERFACE 
DIAGNOSITC ENGINEERING STANDARDS AND CONVENTIONS 
PDP11 MAINDEC SYSMAC PACKAGE 
XXDP USER'S MANUAL 
PRELIMINARY PROGRAMS 
BEFORE THIS MEMORY MANAGEMENT DIAGNOSITC IS RUN, THE 
FOLLOWING DIAGNOSTICS SHOULD BE RUN: 


CKKAAAO 11/4 CPU/EIS 
CKKABAO TRAPS 


ALSO, THE MAIN MEMORY DIAGNOSTIC (CZMSD) SHOULD BE RUN TO SCAN 
AT LEAST THE FIRST 16K TO SEE THAT A PROGRAM CAN BE EXECUTED. 


OPERATING INSTRUCTIONS 
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2.2 


2.3 


THE PROGRAM IS SUPPLIED ON THE gr gts LOAD MEDIA 
REFER TO THE XXDP USER'S MANUAL FOR FURTHER INFORMATION. 
FOR USE WITH ACT OR APT, REFER TO THEIR RESPECTIVE 
DOCUMENTS. _THE PROGRAM CAN ALSO BE DIRECTLY LOADED 
USING THE ABSOLUTE LOADER AND THE BINARY PAPER TAPE. 


STARTING PROCEDURES 


THE PROGRAM IS STARTED BY LOADING ADDRESS 200 AND 

STARTING, THE rte REGISTER SHOULD BE SET ACCORDING TO 
SECTION 2.3 BEFOR <p Rg gl Be HOWE V F 
DESIRED, THE PROGRAM WILL USE THE SOFTWARE SWITCH REGISTER 
AT LOCATION 176 (LOCATION 174 WILL BE USED AS THE SOFTWARE 
DISPLAY REGISTER). IN THAT CASE, THE PROGRAM WILL ASK FOR 
THE ma SWITCH REGISTER VALUE BY TYPING ‘‘SWR= XXXXXX 
NE W= TER TYPING THE NAME OF THE PROGRAM (XXXXXX = 
THE OCTAL CONTENTS OF LOCATION 176). (SEE SECTION 2.4) 


ALSO THE PROGRAM CAN BE MADE TO USE THE SOFTWARE SWITCH 
REG. EVEN IF THE CONSOLE SWITCH REG. IS PRESENT BY LOADING 
wag?ze7 INTO THE CONSOLE SWITCH REG. BEFORE STARTING 


CONTROL SWITCH SETTINGS 


Sw15 100000 HALT ON ERROR 
THIS B54. WHEN SET WILL HALT 
THE PROCESSOR WHEN AN ERROR IS 
DETECTED AFTER THE ERROR ME SSAGE 
HAS BEEN TYPED. PRESSING CONTINUE 
WILL RESUME TESTING (SEE SECTION 
3.1 ABOUT LOADING THE SWITCH REG 
BEFORE CONTINUING). 


SwW14 040000 LOOP ON TEST 
Lyng SWITCH WHEN SET WILL 
AUSE THE PROGRAM TO LOOP ON 
THE CURRENT SUBTEST. 


Sw13 020000 INHIBIT ERROR TYPEOUTS 
THIS SWITCH WHEN SET WILL 
INHIBIT THE TYPING OF ERROR 
ME SSAGE 


Sw12 010000 INHIBIT TRACE TRAP 
THIS SWITCH WHEN SET WILL 
ae T-BIT TRAPPING WHICH 
NORMALLY TAKES PLACE DURING 
EVERY OTHER PASS STARTING 
WITH THE THIRD PASS. 


sw10 002000 BELL ON ERROR 


SEQ 0005 
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203 
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2.4 


THIS SWITCH WHEN SET WILL RING 
THE CONSOLE TERMINAL BELL WHEN 
AN ERROR HAS BEEN DETECTED. 


Sw9 001000 LOOP ON ERROR 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
FIRST FAILURE WHICH IS ENCOUNTERED 
EVEN IF THE FAILURE IS INTERMITTANT 


Sw8 000400 LOOP ON TEST IN SWR<7:0> 
THIS SWITCH WHEN SET WILL 
CAUSE THE PROGRAM TO LOOP ON THE 
TEST WHOSE TEST NUMBER IS SET 
IN BITS 7-0 OF THE SWITCH REG. 


LOADING THE SWITCH REGISTER 


THE CONSOLE BY TYPING A CONTROL P (“P), THEN WHEN THE CONSOLE 
PROMPT IS RECIEVED, TYPE ‘D Sw WOK WHERE *XXXXXX"" IS THE 
INTENDED VALUE OF THE SWITCH REGISTER. THE VALUE OF THE 
CONSOLE SWITCH REG. CAN BE CHANGED ANY TIME WHETHER THE PROGRAM 
IS RUNNING OR NOT. 


TO LOAD THE SOFTWARE SWITCH REG. WHILE THE PROGRAM IS 
RUNNING, A CONTROL G (*G) SHOULD BE TYPED ON THE CONSOLE 
TERMINAL. (THE ‘‘SCOPE’’ AND ‘ERROR’’ ROUTINES CHECK TO SEE 

IF A “G HAS BEEN TYPED. < THE ORIGINAL VALUE OF THE SOFTWARE 
SWTICH REG. WILL BE REQUESTED AS MENTIONED IN SECTION 2.2. 


IN RESPONSF 6 A _*G OR AT THE BEGINNING OF THE PROGRAM, THE 
PROGRAM WILL TYPE: 


SWR = XXXXXX NEW = 


WHERE *XXXXXX'' IS THE CURRENT OCTAL wag OF LOC. 176. 
THE OPERATOR MAY THEN TYPE ANY ONE OF THE FOLLOWING: 
XXXXXX<CR> ONE TO SIX OCTAL DIGITS FOLLOWED BY A 


Ww VALUE HE 
<CR> usr A ee LEAVES THE SWITCH REG. 
XXX*U A CONTROL-U (*U) WILL CAUSE ALL OF THE 
ac WILL CAUSE THE PROGRAM TO TYPE THE PRESENT 


FOR THE SWITCH REG., AND JUMP TO THE END- 

OF=PASS ROUTINE SO THE PROGRAM WILL GO DIRECTLY 

TO THE NEXT PASS WITH A NEW SW. REG. VALUE 
<ILL.CHAR> ANY CHARACTER TYPED WHICH IS NOT ANY OF THE 

ABOVE OR AN OCTAL DIGIT WILL CAUSE THE PROGRAM 

TO TYPE A ‘"?<CRLF>** AND REACT AS THOUGH A 

“U HAD BEEN TYPED. 


NOTE: RECOGNITION OF A “G MAY BE HAMPERED BY 


SEQ 0006 
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=---- EXECUTION OF A tha "RESET’’ INSTRUCTIONS 
WITHIN THE PROGRAM 


EXECUTION TIMES 


THE RUN TIME FOR A SINGLE PASS WITH TRACE TRAPPING 
ENABLED IS APPROXIMATELY 5 SECONDS WITH CACHE. 


ERROR INFORMATION 


IF AN ERROR IS DETECTED, THE PROGRAM WILL TRAP TO THE 
ie! HANDLING ROUTINE ($ERROR). THE VALUE OF BITS 
is, 13,10, AND 9 IN THE SWITCH REGISTER ARE CONSIDERED 
IN REPORTING AN ERROR (SEE SECTION 2.3). ®t 

ERROR INFORMATION WILL BE TYPED UNLESS Sw13 = 


IF SW15 = 1, THE PROCESSOR WILL HALT AFTER THE ERROR IS 
REPORTED. IF THE ws NTS OF THE SOFTWARE SWITCH REGISTER 
ARE TO BE CHANGED, A “G SHOULD BE TYPED BEFORE PRESSING 
"CONT INUE’’ TO RESUME TESTING. 


IF SW9 = 1 (LOOP ON ERROR), THE PROGRAM WILL GO TO THE 
oe gt CONTAINED IN LOCATION "SLPERR’’. AFTER REPORTING 
THE ERROR. ‘‘SLPERR’’ IS SET BY EACH ‘‘SCOPE’* CALL AND IS 
SET DIRECTLY DURING SOME SUBTESTS TO PROVIDE THE SMALLEST 
LOOP FOR LOOPING ON ERROR. IF SW9 = 0, THE PROGRAM WILL 
RETURN TO THE INSTRUCTION Ae ry THE ERROR CALL. 

(SEE SECTION 5.3 FOR MORE ON ‘LOOP ON ERROR’’). 


INTERPRETING ERROR REPORTS 


EVERY ERROR REPORT TYPES THE NUMBER OF THE A >a 


THE THE 
COMMENTS ASSOCIATED WITH THAT PARTICULAR ERROR AND SUBTEST. 
A DESCRIPTION OF THE TEST FOUND IN THE PROGRAM LISTING 

WILL ALSO PROVIDE THE OPERATOR WITH INFORMATION ON THE LOGIC 
AND FUNCTIONS BEING TESTED. 


EVERY —— REPORT ALSO TYPES AN ERROR MES® ..E 
GIVING A VERBAL DESCRIPTION OF THE ERROR ~ «| HAS 
BEEN DETECTED. 


BY USING THE COMMENTS AND TEST ape alee. FOUND IN 
RM CTION 


SESS SRSS SSE VRSE 


LOGIC WA ING TESTE 
TO THE ENGINEERING DRAWINGS TO ISOLATE THE PROBABLE 
CAUSE FOR THE FAILURE. 


NINANGN 
— 32 
RWNo 





CKKTBBO 11/44 MEM MGMT PRT 6 MACRO M1113 O5=DEC-79 14:41 PAGE bo. 


3.3 SAMPLE ERROR REPORT 


bar pe peep 
DONA 


BELOW IS AN EXAMPLE OF AN ERROR WHICH COULD HAVE 
OCCURRED DURING EXECUTION OF THE PROGRAM: 


MEM. MGMT. REG. BITS NOT SET Syl 

REGISTR WROTE READ READ=(BINARY) 

apne (OCTAL) (OCTAL) 5432109876543210 TESTNO ERRORPC 
77572 040000 060000 0110000000000000 000012 022060 


WE SEE THAT THE ERROR OCCURRED IN TEST s AT LOCATION 
022060. THE ‘REGISTER ADDRESS** TELLS US THAT WE WERE 
TESTING MEMORY MANAGEMENT'S STATUS RGISTER 0 (SRO). 
IN THE LISTING, THE TEST DESCRIPTION SAYS THAT THE 
ERROR BITS (BITS <15:13>) OF = WERE BEING SET AND 
HE OERR oR eel SAYS WE TRIED 
NG * 040000" SRO BUT WHEN WE 
WE R IT APPEARS THAT SIT 13 IS 
*4'* OR IT IS GETTING SET WHEN BIT 14 IS SET 
T ERROR REPORTS BEFORE AND AFTER THIS ONE COULD 
TELL US WHICH IS THE CASE. 


MISCELLANEOUS INFORMATION 


Res 


THE PROGRAM IS FULLY ACT AND APT COMPATABLE 
AND IS SUPPORTED UNDER THE XXDP PACKAGE. 


END-OF -PASS MESSAGE 


AT THE END OF EACH PASS OF THE PROGRAM THE PASS NUMBER 
AND TOTAL NUMBER OF ERRORS SINCE THE LAST END-OF-PASS ARE 
REPORTED IN THE END-OF=PASS MESSAGE. FOR EXAMPLE: 


END OF PASS #2 TOTAL ERRORS SINCE LAST REPORT 0 


THAT WOULD INDICATE THAT PASS TWO WAS JUST COMPLETED 
AND NO ERRORS WERE DETECTED DURING THAT PASS. BOTH 
THE PASS NUMBER AND NUMBER OF ERRORS ARE DECIMAL NUMBERS. 


T-BIT TRAPPING 


THE “T-BIT’’ (BIT 4)_IN THE PROCESSOR STATUS WORD IS SET 
BY AN ‘RTI’ IN THE END-OF-PASS ROUTINE sor EVERY OTHER PASS 
BEGINNING WITH THE THIRD PASS (PASSES 3,5,7,9...). IT 
TRAPPING CAN BE INHIBITED (BY SETTING BIf i2-= 1 IN THE SWITCH 
REGISTER (SEE SECTION 2.4 


POWER FAILURE HANDLING 


SSRERES 


LNG 
3S 


N 
=~ 
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IF A POWER FAIL OCCURS (FOLLOWED BY A POWER UP), 

ot we} “POWER FAILURE-RESTARTING'’ IS TYPED OUT AND 
“PROGRAM WILL RESTART EXECUTION AT “‘START:** (THE 

VERY BEGINNING OF THE PROGRAM. IF THE SOFTWARE 

Me dae IS BEING USED, ITS CONTENTS WILL BE 


PHYSICAL _BuS ADDRESS CONSTRUCTION 


BELOW IS A SIMPLIFIED DIAGRAM OF HOW THE MEMORY 
MANAGEMENT LOGIC CONSTRUCTS A PHYSICAL BUS ADDRESS 
USING THE VIRTUAL ADDRESS AND THE PAGE ADDRESS REGISTER. 
THE PAGE DESCRIPTOR REGISTER SELECTED WILL CONTAIN THE 
PAGE EXPANSION, LENGTH, AND ACCESS INFORMATION. 


12 11 10 09 08 07 06 05 04 03 02 01 00 


Oe 43 4 4-4. 40:3.453-4 3 2 ee 


(ADDED TO) 
15 14 13 12 11 10 09 08 07 06 05 04 03 02 01 00 


eee eee we Eee Dee OO SB Se SH BE De RH SS SP Se Se RPE ETO Se Tee OS 


re @£2ove@eoet6064 089 68.6 3 


I 
I 


Vv 
21 20 19 18 17 16 15 14 13 12 11 10 09 08 07 06 05 03 02 01 00 
0 £03 1064 8 62S ® 5 ta 


VBA BITS <15:13> SELECT THE APPROPRIATE PAR AND PDR 
PSW MODE BITS <15:14> SELECTS THE USER (=11), SUPERVISOR 
(=01) OR KERNEL (=00) SET OF PAR'S/PDR'S 


PROGRAM DESCRIPTION 


SUBROUTINES USED BY THIS PROGRAM 


aa 


reLL OES IS A 4 Ba THE SUBROUTINES AND HANDLERS USED 
BY THIS PROGRAM THAT ARE NOT PROVIDED BY THE ‘‘SYSMAC 
PACKAGE"’. DETAILS OF THE SUBROUTINES UNIQUE TO THIS 
PROGRAM MAY , BE FOUND IN THE PROGRAM LISTING. REFER TO 
on Se yous " DOCUMENT AND PROGRAM LISTING FOR THE OTHER 


TURN OFF T=BIT AND SAVE CURRENT PSW 
N AND 


- 
ee 
3. 
4. 


PAR/PDR 
CONVERT VIRTUAL ADDRESS TO PHYSICAL ADDRESS 
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SEQ 0010 


NOTE ALSO THAT THE MACRO LIBRARY * TO ASSEMBLE THIS PROGRAM 
HAS OTHER SPECIAL ROUTINES APPENDED TO THE SYSMAC MACRO PACKAGE; 
fametiy MUST BE USED TO ASSEMBLE CEI THER PART A OR PART B 


PROGRAM LISTING 


A TABLE OF CONTENTS APPEARS AT THE BEGINNING OF sa LISTING 
WHICH CONTAINS THE NAMES OF EACH SECTION, SUBTEST 
70 Sage AND THE LINE NUMBERS CORRESPONDING TO THE START OF 


FOLLOWING THIS SECTION OF DOCUMENTATION IS THE ACTUAL 
PROGRAM Yu. COMPLETE WITH SUBTEST DESCRIPTIONS AND 
“CODING COMMENTS’. 


USING THE PROGRAM TO DIAGNOSE A FAULT 


WHEN AN ERROR OCCURS, ONE OF THE THINGS THAT'S IMPORTANT 
TO NOTE IS WHAT PASS THE ERROR OCCURRED ON. IF THE PASS 
NUMBER IS OD BE 


THE PROGRAM A 
QUAL TO ‘1’ TO INHIBIT T-BIT 
THIS SHOULD HELP YOU DETERMINE WHAT MAKES THE 
MACHINE FAIL AND WHEN. 


IF YOU HAVE A ae RUNNING WITH BIT 15 OF THE SWITCH 

REG. EQUAL TO ‘0’’, THEN YOU ARE ABLE TO LOOK AT ALL 

THE ERRORS THAT MAY BE RELATED TO THE FAULT YOU ARE 
DIAGNOSING. A FAULT _IN AN EARLIER TEST MAY RESULT IN 
ERRORS DURING LATER TESTS WHICH MAY GIVE YOU MORE 

CLUES ABOUT THE NATURE OF THE FAULT. NOW USE THE METHOD 
OUTLINED IN SECTION 3.2 FOR EACH ERROR TO GATHER AS 
MUCH INFORMATION AS POSSIBLE. 


NOW TO TEST  y IDEAS ON THE CAUSE OF THE FAILURE, 


OF THE SuITCH REG. EQUAL TO ' 

FOR AN EVEN TIGHTER SCOPE LOOP THE ERROR CALL CAN 
REPLACED WITH A BRANCH (REFER TO COMMENTS BY ERROR CALLS 
IN THE PROGRAM LISTING). 


OR YOU COULD LOOP ON THE res, BY EITHER SETTING BIT 14 

OF THE SWITCH REG. eran TO *‘l"* OF BY SETTING BIT ne OF THE 
SWITCH REG. EQUAL TO ‘‘l'* AND THEN Mitel THE TEST NUMBER 

IN BITS 07-00 OF THE SWITCH REG. YOU W PROBABLY WANT TO 
gh Me TYPEOUTS BY SETTING BIT is OF THE SWITCH REG. 
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S22 

523 TITLE CKKTBBO 11/44 MEM MGMT PRT B 
:*COPYRIGHT (C) 1979 
:*DIGITAL EOUIPMENT CORP. 
;*MAYNARD, MASS. 01754 


-e 


‘THIS PROGRAM WAS ASSEMBLED USING THE PDP=-1! MAINDEC SYSMAC 
; *PACKAGE (MAINDEC=11=DZQAC-C3), JAN 19, 1977. 


*SBTTL OPERATIONAL SWITCH SETTINGS 
“* 
; SWITCH USE 


* 

* 

;* 15 HALT ON ERROR 

? 1 LOOP ON TEST 

* INHIBIT ERROR TYPEOUTS 

° INHIBIT TRACE TRAP 

;@ BELL ON ERROR 

* LOOP ON ERROR 

hed 8 LOOP ON TEST IN SWR<7:0> 
-SBTTL BASIC DEFINITIONS 

eA tag OF THE STACK POINTER *** 1100 *** 


STACK= 
ERROR=EMT 
SCOPE=I0T 
ey wee, PES DEF INI TIONS 


ODE FOR yg toy TAB 


URN 
;;CODE FOR CARRIAGE RETURN-LINE FEED 
; PROCESSOR STATUS WORD 


7;STACK LIMIT REGISTER 

3 PROGRAM INTERRUPT REQUEST REGISTER 
DSWR= 7570 ; s HARDWARE SWITCH REGISTER 
DDISP= 177570 ;HARDWARE DISPLAY REGISTER 
ewan,” teeckons REGISTER ery 


REGISTER 
REGISTER 
;;GENERAL REGIS 
3 STACK POINTER 
PC= %7 COUNTER 
z*PRIORITY LEVEL DEF INI TIONS 
PRO= 0 IOR 


NOUSWN-O 





M1 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 8-1 
BASIC DEFINITIONS 


:*' "SWITCH REGISTER’ SWITCH DEFINITIONS 
Sw15= 100000 


;*DA TA 


1 

BIT9=B1T09 
B1T8=B1T08 
B1T7=B1T07 


1T0=81T00 

; *BASIC Popu TRAP VECTOR ADDRESSES 

ERRVEC= ; TIME OUT AND OTHER ERRORS 
RESVEC= 10 ‘TRE SERVED AND ILLEGAL INSTRUCT IONS 
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BASIC DEFINITIONS 


TBITVEC= 


——— BIT 
TRIVE 


77 TRACE TRAP 
; ;BREAKPOINT TRAP (BPT) 
os DOV AIA TRAP (JOT) **SCOPE** 


FAIL 
: EMULATOR TRAP (EMT) **ERROR** 
;""TRAP’* TRAP 


+:TTY KEYBOARD VECTOR 
TPVEC= 64 ::TTY PRINTER VECTOR 
PIRQVEC=240 [PROGRAM INTERRUPT REQUEST VECTOR 
.SBTTL MEMORY MANAGEMENT DEF INI TIONS 
:*KT11 VECTOR ADDRESS 
MMVEC= 250 
z*KT11 STATUS REGISTER ADDRESSES 
177572 SRO=  —«- 177572 
SR1= 
SR2= 


172516 
;*USER *‘I"’ PAGE DESCRIPTOR REGISTERS 
UIPDRO= 777600 


C 
C 
C 
C 
C 


aovnnuu "© 


177676 


172200 é 
172202 SIPDR1= 172202 
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NN NNNNN 
mn PRINTNINT NTN] 


NN 


NNNN 
mM 
ine) 


72256 
;*SUPERVISOR ‘D'' PAGE ADDRESS REGISTERS 
SDPARO= 172260 


172276 
;*KERNEL ''I"* PAGE DESCRIPTOR REGISTERS 
KIPDRO= 172300 


316 ’ 
aon DESCRIPTOR REGISTERS 


723 
723 
7 
72 
7 

7 

7. 

7. 


Ww 
VALM 


AGE ADDRESS REGISTERS 


OALNO 
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SEQ 0015 


NNN 
nroror 
Ww 


56 
"" PAGE ADDRESS REGISTERS 


og 


NNNNNNNN 
nN eee 
NN 


AR7= 172376 
;*ADDITIONAL DEFINITIONS 
* 


BION 
B8ss 


WWWWG 
Wr 


U 

TBIT=B1T4 

WBIT=BI1T6 
CPUERR=177766 
KERSTK=STACK 
SUPSTK=STACK=200 
USES TK=STACK-300 


DVSVSVSVSVSTSTATS 
BIKAK 


yw 
LEW 
-oOo 


54 
5 


* 
Nm 
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TRAP CATCHER SEQ 0016 


-SBTTL TRAP CATCHER 


:*ALL UNUSED LOCATIONS FROM 4 = 776 CONTAIN A ‘'.#2,HALT’’ 
S*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
: LOCATION Q CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 


DISPREG: “WORD 0 3;SOFTWARE DISPLAY REGISTER 


SWR DO SOFTWARE SWITCH REGISTER 
.SBTTL STARTING ADDRESS(ES) 

JMP @ASTART ;;JUMP TO STARTING ADDRESS OF PROGRAM 
-SBTTL ACT11 HOOKS 


MPR AAS AASSALSASALALALAAASSASERAASASES SALE SASSER ESSE ARREARS ARES SASSY 


SHOOKS REQUIRED BY ACT11 
$V; :SAVE PC 


321)SET LOC.46 TO ADDRESS OF SENDAD IN .SEOP 
sce) seT LOC. Pe TO ZERO 
RESTORE P 


PC i: 
.SBTTL APT PARAMETER BLOCK 
J PAAR ERE ERE EE EEE EEE ERE EEEEEEKKEKEEEKEKEKEKEKER EE 
SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 
J PERE EERE EERE EEE EEE EERE EKEH 
SAVE CURRENT LOCATION 
SET POWER FAIL TO POINT TO START OF PROGRAM 
FOR APT START UP 
;POINT TO APT INDIRECT ADDRESS PNTR. 
POINT TO APT HEADER BLOCK 
‘ RESET LOCATION COUNTER 
SNe ECU E EOL 
:SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDP11 DIAGNOSTIC 
j INTERFACE SPEC. 


SHIBTS: 3;;TWO HIGH BITS OF 18 BIT MAILBOX ADDR. 

SMBADR : SMAIL org OF APT “ere (BITS 0-15) 

STSTM: 2 7 TIM OF LONGEST TEST 

SPASTM: 5 ee IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY) 

SUNITM: .WORD 5 ADDI TIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNIT 
$ETEND-SHAIL/2 3;LENGTH MAILBOX~E TABLE (WORDS) 





E 2 
CKKTBRO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 10 
COMMON TAGS 


SEQ 0017 
577 -SBTTL COMMON TAGS 


etrirtiitt iit tiiitt iti 
7*THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
;*USED IN a 


3;START OF COMMON TAGS 


2s CONTAINS THE TEST NUMBER 
ERROR FLAG 
SUBTEST ITERATION COUNT 
SCOPE LOOP ADDRESS 
SCOPE RETURN FOR ERRORS 
TOTAL ERRORS DETECTED 
ITEM CONTROL BYTE 
MAX. ERRORS PER TEST 
PC OF LAST ERROR = 
*GOOD* DAT 
a seul DATA 


7sCONTAINS "BAD" DATA 
7; RESERVED--NOT TO BE USED 


; AUTOMATIC MODE INDICATOR 
7s INTERRUPT MODE INDICATOR 


ADDRESS OF SWITCH REGISTER 
7:ADDRESS OF DISPLAY REGISTER 
72 TTY KBD STATUS 


::TTY KBD BUFFER 
:zTTY PRINTER STATUS REG. ADDRESS 
eaTTy PRINTER BUFFER REG. ore Fin 

ONTAINS NULL CHARACTER FOR FILLS 
Z:CONTAINS # OF FILLER CHARACTERS REQUIRED 
+2 INSERT FILL CHARS. AFTER A ‘LINE FEED’ 

: "TERMINAL AVAILABLE’ FLAG (BIT<07>=0=YES) 
7: CONTAINS THE ADDRESS FROM 
7;WHICH (S$REGO) WAS OBTAINED 


ie ;CONTAINS ((S$REGAD) +0) 


mk ee ed ed ed ed ed 


SSSSSSSSBssssssssss 
BREE RARE ARNSRRALSS 


Sa CSCS eee wae 
to 

ad 

v 


nm 


ran) 
= 
GW 


ae = CONTAINS 
; ; USER DEF INED 


USER DEF INED 
>ZUSER DEFINED 
: 2 USER DEF INED 
: 3 | ON ERROR ADDRESS 
sASCIZ <207><377><377> ::CODE FOR BELL 


ASCII = /?/ QUESTION MAR 
eASCII <15> {CARRIAGE RETURN 
eASCIZ <12> LINE FEED 


34 
WRNOR 
SOOCOCOO BDOOCOCCORF DCO—NO 


S8S8888s 
3 


MoNMNMNoNPoNMNWw 


mr 
No— 
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COMMON TAGS SEQ 0018 


SRR AAA RARE EEE EEE EEE E EERE AEE EERE RE RREREER. REREEEH 


*SBTTL APT MAILBOX-ETABLE 


LRAT AEA ETA EA ERE REE RARER ERR EERE EERE ERED 


SEVEN 
001224 SMAIL: 37APT MAILBOX 
001224 000000 SMSGTY: .WORD AMSGTY ::MESSAGE TYPE CODE 
001226 000000 $FATAL: .WORD AFATAL ::FATAL ERROR NUMBER 
001230 000000 $TESTN: .WORD ATESIN ;:TEST NUMBER 
001232 000000 $PASS: .WORD APASS ::PASS COUNT 
000000 SDEVCT: .WORD ADEVCT ;:DEVICE COUNT 
1236 000000 WORD IT ::1/0 UNIT NUMBER 
001240 000000 $MSGAD: .WORD AMSGAD ::MESSAGE ADDRESS 
001242 000000 $MSGLG: .WORD AMSGLG ::MESSAGE LENGTH 
001244 $SETABLE +:APT ENVIRONMENT TABLE 
001244 000 SENV:  .BYTE AENV ; ENVIRONMENT BYTE 
001245 000 SENVM: . BYTE AENVM  ;:ENVIRONMENT MODE BITS 
001246 000000 $SWREG: .WORD ASWREG ::APT SWITCH REGISTER 
001250 000000 SUSWR: .WORD AUS SUSER SWIT 
001252 000000 $CPUOP: .WORD ACPUOP :: TYPE ,OPTIONS 
;* BiTS Is-12cPu T TYPE 
;* 1/04=01, 11/05=02,11/20=03, 11/40=04,11/45=05 
te 11776206. PD Q=07,0=10 
te BIT 10=REAL TIME cL o e 
3* BIT 9=FLOATING POINT PROCESSOR 
te BIT 8=MEMORY MANAGEMENT 
001254 $E TEND 
001254 000000 TESTNO: .WORD 0 :HOLDS TEST NUMBER FOR TYPEOUTS 
001256 000000 WASR6: .WORD 0 *USED TO STORE THE STACK POINTER AFTER A TRAP 
001260 000000 TRAPPC: .WORD 0 ‘USED TO STORE THE PC OF A TRAP OR ABORT 
001262 000000 TRAPPS: .WORD 0 “USED TO STORE THE PS OF A TRAP OR ABORT 
001264 000000 WASSRO: .WORD 0 ‘USED TO STORE CONTENTS OF SRO 
001266 000000 WASSR1: .WORD 0 *USED TO STORE CONTENTS OF SR1 
001270 000000 WASSR2: .WORD 0 [USED TO STORE CONTENTS OF SR2 
001272 000000 .WORD 0 *USED TO STORE CONTENTS OF SR3 
001274 000000 TBITPS: .WORD 0 *SAVES THE PSW THAT MAY HAVE ITS T-BIT ON 
001276 000000 VIRT1: . WORD 0 ‘HOLDS VIRTUAL ADDRESS TO BE CONVERTED 
300 000000 PBALO: .WORD 0 SHOLDS BITS <15:00> OF PHYSICAL ADDRESS 
001302 000000 I: .WORD 0 sHOLDS BITS <21:16> OF PHYSICAL ADDRESS 
001304 000000 BADPC: .WORD 0 SHOLDS PC FROM ABORT OR TRAP 
001306 000200 $MXCNT: .WORD 200 ;HOLD MAX. NUMBER OF LOOP ITERATIONS 
001310 000000 $TBIT: .WORD 0 *'T® BIT STATE iNDICATOR 
001312 136 103 015 $CNILC: .ASCIZ /*C/<15><12> — : CONTROL C 
001315 012 000 
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ERROR POINTER TABLE SEQ 0019 


-SBTTL ERROR POINTER TABLE 
ssTHIS TABLE CONTAINS THE INFORMATION FOR EACH er THAT CAN OCCUR. 

*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 
 *LOCATION SITEMB. THIS NUMBER INDICATES WHICH ITEM IN THE Ha, 8 # is PERTINENT. 
;*NOTE1: IF SITEMB IS 0 THE ONLY PERTINENT DATA _IS ($ERRP 
 *NOTE2: EACH deer IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS FOLLOWS: 
EM INTS TO THE ERROR MESSAGE 


-* 
:* 


éERRTB: 
ss] TEM 


;;POINTS TO THE DATA FORMAT 


UNEXPECTED CPU TRAP TO LOC. 004 
;OLD PC OLD PSW R6 WAS CPUERR_ TESTNO ERRORPC 
s TRAPEX TRAPP -WASR6, CPUERR, TESTNO, SERPPC ,0 


UNEXPECTED MEM. MGMT. TRAP TO LOC. 250 
OLD PC OLD PSW R6 WAS SRO SR2 TESTNO _ERRORPC 
dewey 0.6, Nene °° WASR6, WASSRO, WASSR2, TESTNO, SERRPC, 0 


Aw MGMT. ACCESS ABORT DID NOT OCCUR 
;PDR PSW TESTNO ERRORPC 
‘SREG?, $TMPO, TESTNO, SERRPC ,0 


° ’ e ’ 


zACCESS ERROR DID NOT ABORT INSTRUCTION 
:PDR 4 PSW TESTNO ERRORPC 
$REG2,$TMPO, TESTNO, SERRPC , 0 


° Sd e e 


;SRO DID NOT oy ACCESS ERROR CORRECTLY 
[SRO WAS EXPECTD PDR 4 PSW TESTNO ERRORPC 
‘5 ns OY -SREG2,$TMPO, !ESTNO, SERRPC ,0 


Ss 


;SR2 DID NOT iow CORRECT VIRTUAL ADDR. 
>SR2 WAS EXPECTD PDR 4  PSwW TESTNO ERRORPC 
:WASSR2 SRE GS "SREGO, STMPO, TESTNO, SERRPC ,0 


; PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE 
V.B.A. KIPDR4 SRO WAS SR2 WAS TESTNO ERRORPC 
SRE 69. sr -WASSRO ,WASSR2, TESTNO, SERRPC ,0 


AARARAARARAX 
ed ed ed oe oe wd od od = 
MO OBNOUSWH-O 


PAGE LGTH. ABORT DID NOT OCCUR WHEN IT SHOULD HAVE 
3V.B.A. KIPDR4 TESTNO ERRORPC 


BVRT 
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ERROR POINTER TABLE 


624 001414 7 SREGO, $REG4, TESTNO, SERRPC ,0 
ot 001416 051640 : 0 


627 ; 1 

628 001420 : NOT REPORT PAGE LGTH. ABORT CORRECTLY 
629 001422 KIPDR4 SRO WAS EXPECTD TESTNO ERRORPC 
Y aenniaaieaitnammesamtethics 


630 001424 
631 001426 


ID NOT LOCKUP CORRECT VIRUAL ADDR. 
KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC 
SCS MASERG » -$REG3, TESTNO, SERRPC 0 


;SR2 DID NOT LOCKUP CORRECT VIRUAL ADDR. 
:SR2 WAS EXPECTD TESTNO ERRORPC 
;WASSR2, $REG1, TESTNO, SERRPC ,0 


- 
o eve ° 


A pr OR SR2 CHANGED BY A SECOND ABORT 
RST ABORT SECOND ABORT 

‘SRO WAS SR2 WAS SRO WAS SR2 WAS TESTNO ERRORPC 

:STMPO. as: -WASSRO ,WASSR2 , TESTNO, SERRPC ,0 


;SRO OR SR2 WAS 6 RESET’ BY A RESET 
[SRO WAS SR2 WAS TESTNO ERRORPC 
:WASSRO ,WASSR2. TESTNO, SERRPC, ° 


;SR2 NOT TRACKING CORRECTLY 
7SR2 WAS EXPECTD TESTNO ERROPC 
ww) eee , TESTNO, SERRPC ,0 


aie NOT eg? THRU KERNEL SPACE 
WAS R6 WAS TESTNO ERRORPC 
?SREGT. SREG2. TESTNO, SERRPC ,0 


:KT ERROR SERVICED ON ODD ADDR. ERROR 
;PDR TESTNO ERRORPC 
:$REGS, TESTNO, SERRPC ,0 


e eve 


045004 ;SRO_OR SR2 CHANGED BY ODD ADDR. ERROR 
678 001522 3EX ‘plead RECEIV + 
SR2 WAS TESTNO ERRORPC 


679 7 SR SRO WA 
680 001524 ;$REGO, sreCt, WAssRO, Waser? TESTNO, SERRPC ,0 
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ERROR POINTER TABLE SEQ 0021 


051647 DF12 70,0,0,0,0,0 
s* ITEM 22 
045052 EM27 ERROR DURING ‘DOUBLE ERROR’’ (KT & ODD ADDR.) 
047763 DH27 S EXPECT ED: 
:PSW PC SRO SR2 
ees (3$+4) 020147 (3$) 
SR2 TESTNO ERRORPC 


SRO 
051462 DT27 ‘SREGI, $REG3, WASSRO. WASSR2, TESTNO, SERRPC ,0 
051647 DF12 0,0,0,0,0,0 


3*1TEM 23 
045127 EM zMFPI sat“? teen PUSHED WRONG DATA 
050160 DATA DAT 
696 SEXPECTD RECEIVD TESTNO ERRORPC 
697 001544 051420 7 $REGO,$REG1, TESTNO, SERRPC ,0 
pes 001546 051640 :0,0,0,0 


700 7* ITEM 24 
701 001550 045172 EM31 ;MTPI weet? Vas LOADED WRONG DATA 
050160 DH30 DATA 
SEXPECTD RECEIVD TESTNO ERRORPC 
051420 DT30 7$REGO, $REG1, TESTNO, SERRPC ,0 
051640 DF3 :0,0,0,0 


is ITEM 25 
045235 EM32 STACK NOT PUSHED BY MFPI-MTPI 
050246 :TESTNO —ERRORPC 
051434 ; TESTNO, SERRPC ,0 
051655 70,0 


;KERNEL PAGE ACCESSED INSTEAD OF USER: MFPI-MTPI 
SRO WAS SR2 WAS TESTNO ERRORPC 
AREAS MASE «PESTS SEROPC A 


ABORT IN KERNAL D=-SPACE HAD WRONG CONDITION 
i ChmRO) (MAR1) (MARZ) TESTNO ERRORPC EXPECTING 020031 
> $REG1,$REG2,$REG3, TESTNO, SERRPC ,0 


e e eo e e 


ILLEGAL MODE 10 NOT ABORTED 
:TESTNO _ERRORPC 
; TESTNO, SERRPC ,0 


7SRO DID NOT REPORT ILLEGAL MODE 10 CORRECTLY 
;SRO WAS EXPECTD TESTNO ERRORPC 
SAG SAO GREG . TESTNO, SERRPC ,0 


7 1TEM 32 





9 
750 001650 
751 001652 
752 


762 
763 001670 
764 001672 
765 001674 
766 001676 
767 


793 
794 001740 


CKKTBBO 11/44 MEM MGMT PRT B 
ERROR POINTER TABLE 


051624 


046047 
050160 
051420 
051640 


051624 


046115 
050246 
051434 
051631 
046154 
051015 
051560 
051624 


046216 


J 
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;*t1TEM 34 
EM41 
DH41 


DT41 
DF1 


7*ITEM 35 
EM42 


:*ITEM 37 
EM44 
DH30 


DT30 
DF3 


s*1TEM 40 
EM4 


st 1TEM 43 
EM47 


SEQ 0022 


7PSw CHANGED ¢! st RTI_IN USER MODE 
7PSwW WAS EXPECTD TESTNO ERRORPC 
$REG1,$REG2, TESTNO, SERRPC ,0 


° avVveve 


;ABORT IN_KERNAL D=SPACE PICKED UP VECTOR FROM I~SPACE 
7(PSW) __TESTNO ERRORPC EXPECTING XXX340 
;$REGO, TESTNO, SERRPC ,0 


Py Ve 


:D SPACE ENABLE CIRCUITRY HAS FAILED 
;ER AUTOI/D VIRTUAL 

ZREGISTR REGISTR ADDRESS TESTNO PC _AT ABORT 
:WASSRO ,WASSRI , -WASSR2, TESTNO,BADPC ,0 


; INCORRECT STORE BY MTP So 
ZGDDATA STORED TESTNO 
7$REG3,$REG4,TESTNO, SERRPC 


e e td e 


; TRIED TO REFERENCE NON-RESIDENT PAGE 
7 (MRO) (MARI) (MARZ) TESTNO ERRORPC 
$REGO,$REG1, $REG2, TESTNO, SERRPC 0 


cOATAr a FETCHED BY MFP INSTRUCTION 
ZEXPECTD RECEIVD TESTNO ERRORPC 
EGO,$REG1, TESTNO, SERRPC ,0 


Py aVveve 


; TRIED TO REFERENCE NON-RESIDENT PAGE 
7 (MRO) (MARI) =(MAR2) TESTNO ERRORPC 
ZWASSRO WASSRI -WASSR2, TESTNO, SERRPC ,0 


; ILLEGAL CSM DID NOT TRAP TO 10 
ZTESTNO ERRORPC 
;TESTNO, SERRPC ,0 


NOT ENTER SUPERVISOR MODE 
(PSW) _TESTNO ERR PC SUB CALL 
TMP4 , TESTNO, SERRPC ,SRCALL ,0 


3CSM SET UP WRONG PREVIOUS MODE 





K 2 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 11-4 
ERROR POINTER TABLE SEQ 0023 


051015 TD (PSW) _TESTNO ERR PC SUB CALL 
0515 Wie , TESTNO, SERRPC ,SRCAL ,0 


60 
051624 


p*ITEM 44 
046255 E50 :CSM SET UP STACK WRONG 


050160 ;DATA DAT. 

SEXPECTD RECEIVD TESTNO ERR PC SUB CALL 
051420 DT30 TSREG5 ,STMP4 , TESTNO, SERRPC , SRCALL ,0 
051624 DF1 :0,0,0,0,0 


;*I TEM 45 
046304 EM 7CSM ‘on -* prawns: ARGUMENT 
050160 “DATA DAT 
SEXPECTD RECELVD TESTNO ERR PC SUB CALL 
051574 + $REGO, $REG1, TESTNO, SERRPC , SRCALL ,0 
051624 :0,0,0.0,0 


;*1TEM 46 
046342 EMS2 ;CSM PUSHED co PC 
050160 DH30 DATA DAT 

SEXPECTD RECEIVD TESTNO ERR PC SUB CALL 
051610 DT50 7STMP4 ,$REG1, TESTNO, SERRPC , SRCALL ,0 
051624 DF 1 :0,0,0.0,0 


7s ITEM 47 

EM53 CSM DID NOT CLEAR OLD PSW BITS <3:0> 
SOLDPSW TESTNO ERR PC SUB CALL 
$REG1, TESTNO, SERRPC ,SRCALL ,0 


e evVveve 


CSM ACCESSED WRONG SUPERVISOR SPACE 
;TESTNO ERR PC_ SUB CALL 
>: TESTNO, SERRPC , SRCALL ,0 


° e e 


CSM ABORTED WHEN IT SHOULD NOT HAVE 
;TESTNO ERR PC_ SUB CALL 
0514 7 TESTNO, SERRPC ,SRCALL ,0 

36 002026 :0,0,0 
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-SBTTL ***** SUBROUTINES UNIQUE TO THIS PROGRAM 
» SBTTL INITIALIZE ALL PAR'S AND PDR'S 


[RRR E EE EERE ERE EERE REEEE EERE 


THIS ROUTINE WILL INITIALIZE ALL KERNAL, SUPERVISOR, AND 
USER PAR'S AND PDR'S TO THEIR USUAL INITIAL VALUE 


SEQ 0024 


012700 
012702 


077406 
172300 
000020 
172340 
172200 
172240 
177600 
172340 
172360 
000007 


000200 
177600 
177600 
172356 
172240 
172260 
172256 


177640 
177660 


EAE EEREEEEREREEEEEEKKKKKKE 


APRINIT: 
MOV 


1$: 
2$: 


#77406 ,RO 
#KIPDRO,R2 
#20,R1 

sD 
R2.A#KDPDR7+2 
#SIPDRO,R2 
R2,4SDPDR7+2 
#UIPDRO,R2 
1$ 


#KIPARO,R1 
#KDPARO ,R2 


e 


R 
RO, (R1)+ 
RO, (R2)+ 


#200 RO 


RF $5800, (R1) 
#177600, (R2) 
R1, 4K IPAR7 
7$° 


#SIPARO,R1 
#SDPARO ,R2 


5$ 
R1,ASIPAR7 
8$ 


PC 
MUIPARO,R1 
APPA Re 


MAKE ALL PDR'S 4K, READ/WRITE, UPWARDS 
7 EXPANDING, KS 
;LOAD THE ADDRESS OF THE FIRST KERNAL PDR 


[LOAD ALL SUPERVISOR PDR'S 
BRANCH TO LOOP 

;HAVE USER PDR'S At DONE 
BRANCH IF THEY HAVE 

;LOAD o~ Bar PDR'S 


[BRANCH LOOP 

;LOAD Ri "UITH ADDRESS OF KIPARO 
: LOAD R2 WITH ADDRESS OF _KDPARO 
;LOAD LOOP COUNTER WITH 7 

; CLEAR PAR jase REGISTER 


; LOAD CE PAR 

S INCREASE THE PAR VALUE BY 200 
[LOOP UNTIL 7 PAR'S ARE LOADED 
MAP I-SPACE PAR7 TO I/O PAGE 
MAP D-SPACE PAR7 TO 1/0 PAGE 


BRANCH TO USER LOAD ROUTINE 
RETURN TO CALLING ROUTINE 
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D-SPACE TESTS MEMORY MANAGEMENT ABORT SERVICE ROUTINE SEQ 0025 


eek D-SPACE TESTS MEMORY MANAGEMENT ABORT SERVICE ROUTINE 
eritiititiittiitt ities litt tii itt 
THIS ROUTINE WILL BE ENTERED IF A MEMORY MANAGEMENT ABORT OCCURS 
DURING THE D-SPACE ENABLE TESTS. 
ABORT, THE PROBLEM IS PROBABLY 


P IN THE D E 
L OF THE D-SPACE a TESTS, D-SPACE PAGES 1 & 3 AR 
AND ahobeo les AGE 3 IS MAPPED NON-RESIDENT. ALL 
D RESIDENT, 4K, READ/WRITE. THEREFORE, IF 
OR 3 YOU ARE NOT FORCING I-SPACE WHEN 
YOU SHOUL F THE NON-RESIDENT PAGE IS 3, AND YOU ARE IN TEST 
PP talte ARE PROBABLY FORCING I-SPACE WHEN YOU SHOULD BE ALLOWING 


SAREE EEEEEEEEEEEEEEKEEEEEEEEEREREEREREEEKERKKKKKKKK 


 eeeeeeee ees 


919 002272 
920 002300 
921 002306 
922 002312 


923 002316 
924 002324 
925 


177022 
177016 
177012 


175272 
177704 


170172 


NODSPAC 


J 
NDFLAG: .WOR 
BE 


#B1T2 ,MMR3 
a + 


10$ 


(KSP) ,BADPC 
(KSP) +, TRAPPC 
(KSP)+, TRAPPS 
MMRO ,WASSRO 
MMR1 ,WASSR1 
MMAR2 , WASSR2 
ysem 


+34 
2$ 


+2 
#177376 ,MMRO 
#-1 ,NDFLAG 
TRAPPS ,~(KSP) 
TRAPPC ,~(KSP) 
#B1T2 ,MMR3 


;STARTING ADDRESS FOR ABORT SERVICE ROUTINE 
[TURN OFF D=SPACE BEFORE DOING ROUTINE 
sMAKE FLAG ZERO IF THE FIRST TIME 
;F SHOULD -1 


7FLAG 
BRANCH IF FIRST TIME IN ROUTINE 


il “gy) ENTERED THIS ROUTINE BEFORE 

;THE FIRST ERROR IS REPORTED; THE SECOND 

SENTRY ADDRESS IS ON THE STACK, AND THE 
FIRST ERROR CONDITION IS PROBABLY STILL 
T TIME OF ABORT OR TRAP 

URN ADDRESS IN CASE OF LOOP 
PSW_ IN CASE OF LOOP 


:SAVE OLD 
7SAVE STATUS REGISTER 


ZSAVE AUTO INCR/DECR REGISTER 
7SAVE VIRTUAL ADDRESS REGISTER 
[WAS ABORT NON-RESIDENT? 


;BRANCH IF ABORT NOT prin 
7;D-SPACE ENABLE FAULTY 
;BRANCH TO EXIT 

XPECTED M.M. ABORT 
[CLEAR ALL BITS gor 0 AND 8 
;MOVE A -1 TO THE F 
:PUSH OLD PSW ~— STACK 


;RETURN TO MAIN PROGRAM 
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TURN OFF T=BIT AND SAVE CURRENT PSW 


175444 000020 


175434 
176726 


000020 
002360 


» SBTTL TURN OFF T=BIT AND SAVE CURRENT PSW 


3 FEAR EAE EE ERE EERE EEREAEEEEEEREREEREREEERREERERREEREREERRR EE 


7 
;* THIS SUBROUTINE IS USED TO TURN OFF THE TRACE TRAP BIT IN 
; THE PSW IF IT IS ON. THE PROCESSOR STATUS IS SAVED IN 

;* "TBITPS’’ SO THAT THE PSW CAN BE RESTORED TO ITS PREVIOUS 
;@ CONDITION WHEN CONDITIONS WARRANT T-BIT TRAPPING. 

:* 


» Seeneeeeeneneeeneeeeceeereeeeneneeneneeneneeeeeneeeeneeeneeeeee 
OFF : T PSW,#TBIT z1S THE T-BIT SET IN THE PSw? 
BE 1$ ZEXIT IF NO 
PSw,-(SP) PUSH PRESENT PSW ON THE STACK 
(SPS, TBITPS ZALSO SAVE IT IN ‘‘TBITPS'* FOR 
“RESTORING LATER 
#TBIT, (SP) iCLEAR, THE T-BIT (BIT 4) iN THE PSW 
#1$,-(SP) ;PUSH C OF RTS‘ ON STAC 
Tre ru a 1$ WITH BIT OF F 
1$: PC *RETURN TO PROGRAM 


-SBTTL TURN ON T-BIT AND RESTORE PREVIOUS PSwW 


J FREER ERE EEEEEEEEEREREREEREREREREEEEEREEEEEREEEEREEE 


-* 

;* THIS SUBROUTINE IS USED TO RESTORE THE ea ey STATUS 
;* TO ITS PREVIOUS CONDITION BY RESTORING THE "T-BIT PSw'* 
-* 
'* 


’ 
’ 
° 
’ 
° 
4 
Py 
T 


IT P 
SAVED BY THE ‘‘TOFF’*’ SUBROUTINE iN THE ‘‘TBITPS’’ LOCATION. 


WET T ICT c tie t titi it iii t iii iii iii iii iii iii, 
TBITPS ,#TBIT ;WAS T-BIT ON IN THE PREVIOUS PSW? 
1$ sEXIT IF NO 
TBITPS,-(SP) [PUSH PREV IOUS PSwW ON THE STACK 
#340, TBITPS RESET pe TRS LOCATION 
#1$,-(SP) 3PUSH PC OF *RTS"* STACK 

Re TUR a 1S WITH T-BIT RESTORED 
PC [RETURN TO PROGRAM 


SEQ 0026 
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seeee TRAP HANDLING ROUTINES *#*«# 


-SBTTL ***** TRAP HANDLING ROUTINES *#*#« 
. SBTTL CPU TRAP HANDLER ROUTINE 


SERRA EREREREEEAEAEEAAEEEEARREREARAEAEERAEAAAKEKEREE 


S SUBROUTINE WILL pe? ALL CPU TRAPS AND ABORTS THRU 
004). IF THIS SUBROUTINE IS ENTERED BY A 
SCOUTED BEFORE THE FIRST HAS BEEN SERVICED, A HALT IS 


eRe E REE ERE EAE AEE E ARORA RAE AREER EEE R RRR 
: INC (PC)+ sMAKE FLAG ZERO IF FIRST TIME THRU 
: D -1 ZNEGATIVE ONE FOR "HAVE ENTERED'’ FLAG 
1$ [BRANCH IF FIRST TIME IN 
7STOP! = I'VE ENTERED ha} ROUT INE 
El Ay NISHED 


76630 s (KSP) +, TRAPPC 
76626 (KSP)+, TRAPPS 
76616 a7 aaeee 
+ 
77777 ~=177746 #-1,TIMFLG 
75312 CPUERR E 
7 TRAPPS ,~(KSP) “PUT PC 8 PS OF TRAP ON STACK 


176602 
176574 TRAPPC ,=(KSP) 
;RETURN FROM INTERRUPT OR ABORT 


1 
1 
1 
1 
1 


-SBTTL MEMORY MANAGEMENT TRAP HANDLER ROUTINE 


LAER EAREEEEER ERE REE EE EERE EEEREEEEEREEEEREEEREREREREEE 


THIS SUBROUTINE .— HANDLE ALL UNEXPECTED MEMORY MANAGEMENT 
TRAPS AND ABORTS THRU 'MMVEC’’ (LOC. 250). IF THIS SUBROUTINE IS 
ENTERED BY A SECOND TRAP BEFORE THE FIRST HAS BEEN SERVICED, A 
HALT IS EXECUTED. 


3 PETTITT TTT Ltt tte tect c iii iii iii iii iiii iii titi iii titties 
002466 5227 2 MAKE FLAG ZERO IF FIRST TIME THRU 
: ONE FOR ‘HAVE Dated FLAG 


(KSP) +, TRAPPC 
(KSP)+, + ei 


KSP ,WASR ER_ VALUE 
176544 “SAVE CONTENTS OF KT STATUS REG. 0 
176542 MOV 2 Ss ; SAVE CONTENTS OF KT STATUS REG. 2 
175036 #) SRO 
177724 


016746 TRAPPC ,=(KSP) 


WONOU EW 
SSssue 
BWRLVIS 


gees 


MAKE I 
:PUT PC & PS OF TRAP ON STACK 


SS 
S 





an 
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MEMORY MANAGEMENT TRAP HANDLER ROUTINE SEQ 0028 


10s¢ 002554 000006 RTT RETURN FROM INTERRUPT OR ABORT. 
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weeee = =STARTING POINT OF TEST ***#* 


1025 .SBITL **##* — STARTING POINT OF TEST *sees 
1026 -SBTTL. ***** STARTING ADDRESS OF 200 ***«« 
1027 020000 :=20000 


INITIALIZE THE COMMON TAGS 

THE COMMON TAGS (SCMTAG) AREA 

MOV ASCMTAG RO 3z-FIRST LOCATION TO BE CLEARED 
CLR (R6)+ 7;CLEAR MEMORY LOCATION 

Na MSWR,R6 ; ; DONE? 


;;LOOP BACK IF NO 
MOV WSTACK,SP 7;SETUP THE STACK POINTER 
;: INITIALIZE A FEW VECTORS 
MOV #$SCOPE ,a# IOTVEC Af a VECTOR FOR SCOPE ROUTINE 
#340, ariorvecee s;LEVEL 7 
#SERROR ,AWEMTVEC ‘EMT VECTOR FOR ERROR ROUTINE 
#340, aMEMTVEC+2 ;:LEVEL 7 
#STRAP , AA TRAPVEC TRAP VECTOR FOR TRAP CALLS 
#340, aa TRAPVEC +2; LEVEL 7 
#SPWRDN , AAPWRVEC ; POWER FAILURE VECTOR 
000026 #340, aM#PWRVEC+2 ;:LEVEL 7 
017242 SENDCT , SEOPCT SS SETUP END-OF —-PROGRAM COUNTER 
5067 $ESCAPE 2 ¢CLEAR THE ESCAPE ON ERROR ADDRESS 
112767 000001 160775 MOVB #1 , SERMAX zALLOW ONE ERROR PER TEST 
ss INITIALIZE THE ‘T-B1T ‘ TRAP VECTOR. ye LOAD LOCATION *'‘SRTRN’’, 
3: THE ‘END-OF=PASS'' (SEOP) ROUTINE, WITH A ‘RTI'’ OR ‘RIT 
012737 037574 000014 MOV WSRIRN, @#TBITVEC ;:SET “8 BIT VECTOR 10 $RTRN 
000340 sprees #340, @#TBITVEC+2 ee LEV VEL 7 


000002 #RTI,SRTRN 

020170 000010 #698 QNRESVEC 

020160 #64$ ,-(SP) cos 

000006 017406 : errs -SRTRN SIRT TIS LEGAL--SET SRTRN TO A RTT 


000010 : #10,SP T_ILLEGAL=-CLEAN OFF THE STACK 
000012 000010 66$: #RESVEC#2, amnesvit REST ORE CHER 

161102 $TBIT :CLEAR 'T'' BIT SWITCH 

020206 160672 #. ,SLPADR i SINITIALIZE THE LOOP ADDRESS FOR SCOPE 
012767 020214 160666 TUP THE ERROR LOOP ADDRESS 


MOV PERR 
3-:SIZE FOR A HARDWARE SWITCH REGISTER. IF NOT FOUND OR IT IS 
;;EQUAL TO A ‘**=1"' Ae FOR . SOFTWARE SWITCH REGISTER. 
013746 000004 MOV @#ERRVEC ,-(SP) 3s SAVE ERROR VECTOR 
#67$ ,@#ERRVEC SET UP ERROR VECTOR 
MDSWR ,SWR 77SETUP FOR A HARDWARE SWICH REGISTER 
#DDISP,DISPLAY :;AND A HARDWARE DISPLAY REGISTER 
177777 160662 #-1 ,ASWR 2a TRY TO Toa HARDWARE SWR 
BNE 69$ CH IF BL. yf oe ae 


68$ ; T 
020270 : #68$ , (SP) SISET UP FOR TRAP RETURN 


000176 ; ASWREG , SWR 7zPOINT TO SOFTWARE SWR 
000174 1 #DISPREG DISPLAY 
000004 : (SP) + ,a@#ERRVEC yt ty ERROR VECTOR 
005067 160716 $PASS pe Ck EAR PASS COUNT 
020314 132767 000200 MAPTSIZE,SENVM ;:TEST USER SIZE UNDER APT 
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INITIALIZE THE C 


1030 


1049 020576 


001403 
012767 


000420 


001246 


177777 
037530 
020416 
000042 
160656 
160542 


000001 


0000 
161226 
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160606 


000042 


000001 


000176 


160520 


160510 
151720 


70$: 
.-SBITL 


- SBTTL 


73$: 
74$: 


:;72$: 
71$: 
LOOP: 


INIT: 


& 2 
PAGE 16-1 


BEQ 70$ 77 YES,USE NON-APT SWITCH 
MOV #SSWREG, SWR 7zNO,USE APT SWITCH REGISTER 
TYPE PROGRAM NAME 
>; TYPE THE NAME OF THE PROGRAM IF FIRST PASS 
INC #-1 :3FIR ST TIME? 
BNE ais ;BRANCH IF NO 
CMP HSENDAD , 0442 tS ACT=11? 
3 71$ ; ;BRANCH IF YES 
YPE es ;TYPE ASCIZ STRING 
bey VALUE FOR SOFTWARE SWITCH REGISTER 
TST ase 77ARE WE RUNNING UNDER XXDP/ACT? 
BNE 3$ ; BRANCH IF YE 
CMPB SENV,41 : GARE WE RUNNING UNDER APT? 
BEQ 73$ ;BRANCH IF YES 
CMP SWR ,ASWREG 13 SOF TWARE SWITCH REG SELECTED? 
BNE 74$ ;BRANCH IF NO 
ae rs t2GET SOF T-SWR SETTINGS 
MOVB #1,$AUTOB 7zSET AUTO-MODE INDICATOR 
71$ sGET OVER THE ASCIZ 
ASCIZ <CRLF>#CKKTBBO 11744 MEM MGMT PRT BA<CRLF> 
MOV ASTACK ,KSP 4 a a THE STACK POINTER 
MOV #40000 , PSwW ON SUPERVISOR MODE 
MOV #SUPSTK, SSP ‘INITIALIZE SUPER. STACK POINTER 
MOV #140000 ,PSW STURN ON USER MODE 
MOV #USESTK.USP : INITIALIZE USER STACK POINTER 
CLR PSW ;RETURN TO KERNAL MODE 
MOV #TIMERR ,ERRVEC LOAD CPU SERVICE ROUTINE INTO TRAP VECTOR 
MOV #340, ,ERRVEC+2 :SET NEW PS TO tee LEVEL 7-KERNEL 
MOV #MGMERR , MMVEC :LOAD MEMORY MANAGENT ROUTINE INTO VECTOR 
MOV #340 ,MMVEC+2 SET NEW PS TO PRIORITY LEVEL /7-KERNEL 
MOV #-1,RO0 :PUT -1 INTO RO TO Wet I LEE FLAGS 
MOV RO, TIMELG zs INITIALIZE CPU ERROR FLAG 
MOV RO ,MGMFLG t INITIALIZE MEMORY MANAGEMENT ERROR FLAG 
MOV #340 TBIIPS : INITIALIZE LOG THAT HOLDS T-BIT PSW 
CLR MMRO ;BE SURE MEM. MGMT IS OFF TO START WITH, 
MOV #B1TS,MMR3 ‘BUT TURN ON 22-BIT ADDRESSING MODE 
JSR PC,APRINIT ; JUMP TO PAR/PDR INIT ROUTINE 


SEQ 0030 


F_ 3 
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GET VALUE FOR SOFTWARE SWITCH REGISTER SEQ 0031 


1051 
1052 
1053 
1054 
1055 


1056 5 TR EEE EEE TE EERE EEE ERR kk tk ie 


1057 ;* 
1058 ;* THE NEXT THREE (3) TESTS CAUSE MEMORY MANAGEMENT ERRORS 
1059 ;* TO CHECK THE ABILITY OF STATUS REGISTER O TO RECORD KT 
1060 ;* ERRORS AND THE ABILITY OF STATUS REGISTER 2 TO LOCK UP THE 
1061 ;@ VIRTUAL ADDR. OF THE INSTRUCTION THAT CAUSED THE ERROR. 

;* THE BITS OF SR2 ARE CHECKED AND BITS <15:13>, <6 iim AND <3:0> 
7 ARE CHECKED IN SRO. SO THE SRO AND SR2 LOGIC AND T 
* KT ERROR LOGIC ARE CHECKED. 
3* 


SEERA EEE EEEREEEEEKEEKRKKKEKEKKKEK 


Se Be Be Be Be Be Be Be 


JERR EERE EERE EERE EEE ERE REE EEEEEE ERE EE 


potest 1 NON-RESIDENT ABORT TEST (ACF=084) 


THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
TS IN ey SUPERVISOR 


AND USER MOD &4 AND 
THEN PHYSICAL ADDR. 66000 IS ACCESSED TO CAUSE THE ABORT. 


MASSA SASS££ £22 222 RESSSASESSSSSSLSE SESE SESE RRS ARREARS SAAR ASSESS SS 


T1: 


f 


—_ 
w 


;LOAD DATA FOR PAR*S INTO RO 
;MAP KERNEL PAR'S 384 TO 12-16K 


z;MAP SUPERVISOR PAR'S 384 TO 12-16k 
;MAP USER PAR'S 384 TO 12-16K 


;LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 
LOAD VIRTUAL ree at REF ERENCE PDR4 INTO R1 


- N.R., KERNEL, PG.4 
IN R2 
Ow 


7POIN MGMT. 
[LOAD ACF TEST VALUE INTO KIPDR4 
[LOAD ACF TEST VALUE INTO SIPDR4 
[LOAD ACF TEST VALUE INTO UIPDR4 
; SET LOOP ON ERROR tee aed TO 3$ 
ON MEMORY MANAGEME 
: RO) 7CLEAR PHYS. LOC. 60000 USING PDR3 
157052 : SAVE PSwW_IN CASE OF ERROR 
5 R1 Y TO REF. IT MTT PDR4 ~ SHOULD TRAP TO 5$ 


- MGMT. T DID NOT OCCUR 
“FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;*BR 3$"' 7 


020732 000425 BR 8$ S BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
20734 7 : RESTORE STACK POINTER 
[DID INSTRUCTION GET ABORTED & NOT EXECUTE 


[BRANCH IF YES 
020744 104004 INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 


anh ath ach ah an acd a 
RARAVLS 
oO 
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;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WI TH 
:‘BR 3$°' = 000764 


SRO, WASSRO READ STATUS REGISTER 0 
SR2 ,WASSR2 [READ STATUS REGISTER 2 
aaa DID mn a ri NON-RESIDENT ERROR CORRECTLY? 


IF 
+5 7SRO DID NOT REPORT NON-RES. ERROR CORRECTLY 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR _CALL WITH 
3$** = 000752 


020726 : ASS ,RS [LOAD R4 WITH WHAT SR2 SHOULD READ 
160266 + ame, DID = “7 t RIGHT VIRTUAL ADDR. (=4$)? 


:BRANCH IF YES 
+6 :SR2 DID NOT LOCK VIRTUAL ADDR. OF NON-RES. ERROR 
:FOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR CALL WITH 
: BR 5S" = 000744 
MMRO ; TURN OFF MEMORY MANAGEMENT 
160156 #120000,$TMPO HASVACF=O84 BEEN TESTED IN USER YET 
11$ ZBRANCH_IF YES 
#100151,R3 ZLOAD R3 WITH WHAT SRO SHOULD READ - N.R., USER, PG.4 
156742 #140000;PSW GO TO USER MODE 
BR 2$ ;REPEAT TEST IN USER MOD 
160132 118: #40000, $TMPO S ACF=084 BEEN TESTED IN SUPERVISOR YET 
9$ BRANCH. IF YES 
#100051 ,R3 ZLOAD R3 WITH WHAT SRO SHOULD READ - N.R., SUPERVISOR, PG.4 
156716 #40000, PSW GO TO SUPERVISOR MOD 
BR 2$ ;REPEAT TEST IN SUPERVISOR MODE 
#77404 ,R2 HAS ACF=4 BEEN TESTED YET? 
10$ "BRANCH IF YES 
#77404 ,R2 :THEN LOAD ACF=4 (NON-RES) PDR VALUE IN R2 
#100011 ,R3 ZLOAD R3 WITH WHAT SRO SHOULD READ-N.R. KERNEL .PG. 4 
PS :GO BACK TO KERNEL MODE 
2$ :GO BACK & TEST ACF=4 IN SAME MODE 
PS ;GO BACK TO KERNEL MODE BEFORE LEAVING 
157770 #1$,SLPERR :RESET LOOP ON ERROR POINTER TO. 1$ 
157122 WMGMERR,MMVEC RESTORE ADDRESS OF NORMAL MEMOR 
[MANAGEMENT ERROR ROUTINE TO. MMVEC 


lejojeleje) 

MoNPNONN 
—3 w+ 4H 4 
SeRee 
RENSS 


lelolelelelelolelele) 
oak ch cad ceed ech eed nh eh cant cd een end et ed 
RRSRS OORe 


N— 
on 
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1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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: 
1 
1 
1 
1 
1 
1 
1 
1 
1 
: 
: 
; 
: 
1 
1 
1 
1 
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T2 READ-ONLY ABORT TEST (ACF=2) 


1156 PUMA AAARAARA RATER ATER TTA AEA EAE TARA Tee RATA AeA RRR ATE 


aa 2 READ-ONLY ABORT TEST (ACF=2) 


THIS TEST CHECKS THE ACCESS CONTROL FIELD (ACF) COMPARATOR 
LOGIC BY CAUSING READ-ONLY ABORTS IN KERNEL, SUPERVISOR AND 
USER MODES. PDR 4 IS LOAD WITH ACF=2 AND THEN 

PHYSICAL ADDR. 60000 IS WRITTEN TO CAUSE THE ABORT. 


SEERA EEREREREEEEEEEAEAEAREEAEEAEAEERERREKREEKEKKKEKKKKERE 


T2: 
;KERNEL, SUPERVISOR AND USER PAR'S 3 & 4, 
SAND PDR 3 ARE SETUP FROM LAST TEST 
“LOAD VIRTUAL ADDR. TO REFERENCE PDR3 INTO RO 
*LOAD VIRTUAL ADDR. TO REFERENCE PDR4 INTO R17 
SLOAD R3 WITH WHAT SRO SHOULD READ - ~ R40, KERNEL, PG.4 
SLOAD ACF=2 (READ-ONLY) PDR VALUE IN R2 
157072 2%: #5$,,MMVEC ‘POINT MEM. MGMT. TRAP VECTOR TO 5$\ BELOW 
SLOAD ACF=2 INTO KIPDR4 
“LOAD ACF=2 INTO SIPDR4 
[LOAD ACF=2 INTO UIPDR4 
157710 #3$,$LPERR [SET LOOP ON ERROR POINTER TO 3$ 
mmrd [TURN ON ME MANAGEMENT 


MORY 
3$: (RO) [CLEAR PHYS. LOC. 60000 USING PDR3 
156564 157762 PSwW, $TMPO [SAVE PSW IN CASE OF ERROR 
4$: (R15 ZTRY TO WRITE USING PDR4 = SHOULD TRAP TO 5$ 
M. T. ABORT DID NOT OCCUR 
“FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 


;'BR 3$"° 7 

S BRANCH AROUND STATUS REG. CHECKS IF NO ABORT 
RESTORE STACK POINTER 

DID INSTRUCTION GET ABORTED & NOT EXECUTE 
BRANCH IF YES 

; INSTRUCTION WAS NOT ABORTED, LOC. GOT CHANGED 


rT 
-* 
‘* 
2@ 
‘* 
° 
rs 
$: 


pee te te ee 


NERESEEKS BE 


Sex 


SOOOCOCOCOOCSCOOCOOO C&O 


POPOPOPOMPOPONPOEPONMOPONPYNENY:)s PUP 
wwaiwicuiwimiwichubababababa  abab 


mn 
os 


cee eel ce cee ce ee ce ce ce a ce ce cee cae cad ee ed ed ceed ee ae 
as 


BISVRARASASSELEALALVIS SSN 
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ee el et ek ed ee ed td ed od ed 
BELKIFRAVLESELEARAK 


SSSSSsssss 
NOUEAWIS 
VBYLVLLVLLLVLLLS 
— — SS ss SS SS YY YM I 9 
bin 
ROK 


1 
1 
1 
1 
1 
1 
1 
1 
1 
4 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
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NNN NNONY 


021370 


1226 021372 
00 


012767 


156332 
156330 
160010 


021214 
160000 


156272 
140000 
020151 
140000 
040000 
020051 
040000 


156422 
021130 
002466 
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Est (ACF =2) 


157670 


156454 
157644 


156430 


157526 
156660 


FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;'BR 3$°’ = 000764 


SRO ,WASSRO READ STATUS REG. 0 
SR2 ,WASSR2 oD STATUS REG. 2 
R3,WASSRO oF ad ey READ-ONLY ERROR CORRECTLY? 


+5 [SRO DID NOT REPORT R/O ERROR CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
;'BR 3$" = 752 

M4$ RS [LOAD R4 WITH WHAT SR2 SHOULD 

+ alata DID = ao RIGHT VIRTUAL ADDR. (=4$)? 


[BRANCH YES 
+6 :SR2 DID NOT LOCKUP VIRTUAL ADDR. OF R/O ERROR 
:FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
:'BR 3$"" = 000744 
MMRO ; TURN OFF MEMORY MANAGEMENT 
#140000,$TMPO ;HAS ACF=2 BEEN TESTED IN USER MODE? 
11$ ;BRANCH_IF YES 
#2015) R3 ee R3 + yl ad SRO SHOULD READ-R/0, USER, PG.4 


140000, Psw 7GO TO USER 
5s :REPEAT TEST IN USER MODE 
#40000, ,STMPO HAS ACF=2 BEEN TESTED IN SUPERVISOR MODE? 
#20051,R3 “LOAD R3 WITH WHAT SRO SHOULD READ-R/O, SUPERVISOR, PG.4 
#40000,PSw :GO TO SUPERVISOR MODE 
2$ SREPEAT TEST IN SUPERVISOR MODE 
PSid :GO BACK TO KERNEL MODE BEFORE LEAVING 
#1$,$LPERR “RESET LOOP ON ERROR POINTER TO 1$ 
#MGMERR,MMVEC  :RESTORE ADDRESS OF NORMAL MEMORY 
[MANAGEMENT ERROR ROUTINE TO MMVEC. 


LER EEEKKEEEEEEEEEEREEEERERREEREE 


;ATEST 3 TEST ILLEGAL MODE °*10°" 


THIS TEST CHECKS 70 SEE THAT A 10 IN THE yaaa | MODE BITS OF THE 

PSW WHILE MEMORY MANAGEMENT IS ON IS ILLEGAL. 

MEMORY cont te ABORT eg OCCUR AND STATUS *REGISTER 0 

SHOULD REPORT NON-RESIDENT ABORT, MODE = 10, PAGE = 1 (100103). STATUS 
REGISTER. OS SHOULD LOCKUP THE ADDRESS OF THE INSTRUCTION 

THAT LOADED THE PSW. 


REARS EEA AAKEKEKKEEKAKEAEEREEKEEKEEKKKKKKKKEE 


#2%,SLPERR ;SET LOOP ON ERROR POINTER TO 2$ 
#3$ ,MAVEC ; LOAD ay MGMT. TRAP 44 WITH 3% 


#1, MMRO “TURN ON MEMORY MANAGEMEN 
#100000 ,PSwW [SET 10 IN PSW CURRENT MODE BITS 
+30 ‘ILLEGAL MODE 10 NOT ABORTED 
*FOR A A TIOHTER SCOPE LOOP 
ERASE ERROR CALL WITH 


5$ CH AROUND SRO & SR2 CHECKS 
#KERSTK,SP {RESTORE STACK POINTER 

#100103,R1 LOAD EXPECTED CONTENTS OR SRO INTO R1 
SRO ,WASSRO “READ CONTENTS OF SRO 


AWM: sheneee ei 
o— 
Ww 


a ee ee ee ee 


aS) 
vw 
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rs TEST ILLEGAL MODE Fo 


90187 157614 7 ne DID a Pe ILLEGAL MODE CORRECTLY? 


+31 SRO DID NOT REPORT NR ABORT, PG=1, MODE=10 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;"BR 2$"' = 000757 


5 
#2$,R1 ; LOAD EXPECTED CONTENTS OF SR2 INTO R1 

SR2 ,WASSR2 TREAD CONTENTS OF SR2 

<) seeee ;DID SR2 oy VIRT. ADDR OF ABORTED INST. 


[BRANCH IF YE 
+13 7SR2 DID NOT LOCKUP VIRT. ADDR. OF ILL. MODE INST. 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;‘BR 2$"* = 000 


2 
021476 160000 066 : phion'y ef SRO 7CLEAR POSSIBLE ERROR BITS IN SRO 
021504 002466 #MGMERR|MMVEC RESTORE MEM. MGMT. ABORT VECTOR 
021512 021372 #1$,$LPERR [RESET LOOP ON ERROR POINTER TO 1$ 


SRE EEEEEEEEEEAEEAEEAKAERAEKEEREEEREERKEREEKEKEKKERKEEE 


THE NEXT TWO (2) TESTS WILL BE CHECKING THE PAGE LENGTH 
COMPARATORS AND SOME MORE OF THE KT ERROR DETECTION 

AND STATUS LOGIC. THE PAGE LENGTH FIELD (PLF) IN KERNEL 
PDR 4 IS VARIED AND FOR EVERY PLF, ae (3) VIRTUAL 
ADDRESSES ARE READ. WHILE USING BOTH UPWARD & DOWNWARD PAGE 
EXPANSION, ONE OF THOSE THREE VIRTUAL “ye WILL CAUSE A 
"PAGE LENGTH ABORT’’ WHILE THE OTHER TWO WON'T 


STATUS REGISTER 0 & 2 ARE CHECKED WHEN THE PAGE LENGTH 
ABORT DOES OCCUR TO SEE THAT THE ABORT IS REPORTED AND THAT 
gh bg ame OF THE INSTRUCTION THAT CAUSED THE ABORT 


SEEKER EKER EEEEEREKRKKEKKEE 


SAE EREEEEKEKEREKEEREKEEREKEKKEKKEE 


TEST “ PAGE LENGTH FAULTS-UPWARD EXPANSION 


THIS TEST VARIES THE PAGE se FIELD (PLF) IN KERNEL PDR 4 

FROM 1 TO 177 AND FOR EACH PLF, THREE VIRTUAL ADDRESSES (VBA'S) 
ARE ACCESSED. WHEN VBA <12:6> 15 LESS THAN OR EQUAL TO PDR <14:8> 
NO ABORT SHOULD OCCUR. WHEN VBA <12:6> IS GREATER THAN PDR <14:8>, 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 

os a wo vetd | aati IN THIS TEST IS UPWARD, (THE ED BIT 


SEA AAA REE 


#77406,KIPDR3  :MAKE SURE PDR3 IS DESCRIBED AS Ri 
#77406,KIPDR5 :MAKE SURE PDR5 IS DESCRIBED A 

#100006, RO ‘LOAD VIRTUAL ADDR. TO S$ SELECT Pons” INTO RO 
#406 ,R4 *LOAD FIRST PDR VALUE IN R4 (PLF=1, ACF=6) 
#9$ ,MMVEC “SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 


aa: oeeeeeene: 


—— 
> 
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PAGE LENGTH FAULTS-UPWARD EXPANSION 


MO R4,KIPDR4 sLOAD KIPDR4 WITH PAGE LENGTH VALUE 
157322 #3$, $LPERR tSET LOOP ON ERROR POINTER TO 38 
3$: MO #KERSTK,KSP SMAKE SURE STACK POINTER Is TALL SET UP 
(RO) ,R1 ° RTUAL ADDR. (VBA < PLF = NO ABORT) 
RO “FORM NEXT VI 


& 
157302 #4$,$LPERR 7SET LOOP ON ERROR POINTER TO 4$ 
' #KERSTK,KSP {MAKE SURE STACK POINTER Ts ALL ser uP 
(RO) RI (VBA=PLF - NO ABORT) 


#100,RO 
RO #117700 
157254 #5$,$LPERR : On 4 TO 5$ 
156406 #6$ , MMVEC [SETUP M.M. TRAP VECTOR FOR EXPECTED ABORT 
: (RO) ,R1 SACCESS VIRTUAL ADDR. (VBA > PLF = ABORT TO 6$) 
+10 TEXPECTED PAGE LENGTH ABORT DID NOT OCCUR 
*FOR TIGHTER SCOPE LOOP 


;REPLACE ERROR CALL WITH 
;'BR 5$°° = 000776 ons 


8$ CH AROUND ABORT CHE 
#KERSTK ,KSP “RESTORE STACK POINTER FOLLOWING ABORT 
WASSRO ; TUS REG. 0 


Oo Oo jelolelelelele) 


lolejlojejeleolele) 


;BRANCH IF YES 
SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
7FOR TIGHTER SCOPE LOOP 
sREPLAC CE ERROR CALL WITH 
;'BR 5$°* = 00075 
#5$ ,R3 [PUT EXPECTED SR2 CONTENTS IN R3 
a eee DID a VIRT. ADDR. OF ABORTED INSTRUCT ‘ON? 


+12 :SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORREC LY 
7FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
:'BR 5$'' = 000751 

Abs ete SRO [CLEAR Sac BITS IN  . 


ae 
sim. -RO 


eee Cree ee 


WWANWAWG 
SRSSEERS 


oo 
Mr 
dd ed ed 

NNN 
WN 
PN 


H 
“THE PLF VALUE JUST FORMED 
021740 : (KSP)+,TRAPPC SAVE PC & PS OF TRAP 
012667 (KSP) +, TRAPPS 
SRO ,WASSRO ;SAVE CONTENTS OF SRO FOR ERROR 
SR2 .WASSR2 SSAVE CONTENTS OF SR2 FOR ERROR 
#160000, SRO [CLEAR ERROR BITS IN SRO 
+7 [GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 


016746 TRAPPS,-(KSP) PUT PC & PS OF TRAP ON STACK 
016746 TRAPPC ,~(KSP) 
000002 ;RETURN FROM UNEXPECTED ABORT 


012767 ; #1$,$LPERR #RESET LOOP ON ERROR POINTER TO 1$ 
012767 002466 #MGMERR ,MMVEC ;RESTORE NORMAL M.M. TRAP HANDLER 
ZADDRESS TO M.M. TRAP VECTOR 


SORES ESSER RNS 
© =) 
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PAGE LENGTH FAULTS=-UPWARD EXPANSION SEQ 0037 


SEERA EEE EEA AAA EEE EEE EEKEEEEEERKKEE 


ATEST 5 PAGE LENGTH FAULTS=DOWNWARD EXPANSION 


THIS TEST VARIES THE PAGE ee FIELD (PLF) IN KERNEL PDR4 

FROM 176 TO 0 AND FOR EACH PLF, THREE VIR > ADDRESSES (VBA‘'S) 

ARE ACCESSED. WHEN - <12:6> 15 GREATER THAN OR EQUAL TO PDR <14:8> 
NO PAGE ABORT SHOULD OCCUR.: WHEN VBA <12:6> IS LESS THAN PDR <14:8> 
A PAGE LENGTH ABORT SHOULD OCCUR AND BE REPORTED BY SRO & SR2. 

eee th oF rental? DIRECTION IN THIS TEST IS DOWNWARD, (THE ED BIT 


2 alata Octet aia tala inal tana ae 


#117700 ,RO ;LOAD VIRTUAL ADDR. TO SELECT PDR4_INTO RO 
16,R4 ;LOAD FIRST PDR VALUE IN R4 (PLF=176,ACF=6) 

156206 ’ [SETUP M.M. TRAP VECTOR FOR UNEXPECTED ABORTS 

[LOAD KIPDR4 WITH PAGE Og VALUE 

157034 MOV 7SET LOOP ON ERROR POINTER TO 3$ 

#KERSTK,KSP 7MAKE SURE STACK POINTER IS TALL SET UP 

(RO) ,R1 ACCESS ee ADDR. (VBA > PLF =~ NO ABORT) 

;FORM NEXT Aho ADDRESS IN RO 


me mee Be Be Be Be Be Be Be Be Be 
nur eeaeeeeee se: 
—_—— 

w 


Nm 
w” 


WW 
be 
ooo 
Ww 
w 


#100, 
157014 #4$ ,SLPERR 

MKERSTK ,KSP 
py oe al 


Rd, # 100000 


10$ 
156766 #5$, SLPERR 
156120 #6$ ,MMVEC 
(RO) ,R1 ; VBA < PL 
+10 EXPECTED PAGE LENGTH ABORT DID NOT OCCUR 
sFOR TIGHTER SCOPE LOOP 
ERR eet L WITH 


ea 
wn 


373 
3 
3 
3 
3 
3 
3 


BAIN 
© 


cE 
;" BR 3" = 
8$ BRANCH AROUND ABORT CHECKS 
AMKERSTK ,KSP ZRESTORE STACK POINTER FOLLOWING ABORT 
RO ;RE STATUS REG. 0 
;READ M.M. STATUS REG. 2 


PUT EXPECTED SRO CONTENTS IN R2 
:D1D a at rl PG. LENGTH ABORT, PG. 4, KERNEL? 


H IF YES 
“SRO DID NOT REPORT PG. LENGTH ABORT CORRECTLY 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 

+ oath oko 


#5S$ ,R3 SPUT EXPECTED SR2 CONTENTS IN R3 
Sata ;DID ong Lock VIRT. ADDR. OF ABORTED INSTRUCTION? 


YES 
+12 'SR2 DID NOT LOCKUP VIRT. ADDR. OF ABORT CORRECTLY 
ZFOR TIGHTER SCOPE LOOP 

ZREPLACE ERROR CALL WITH 

:'BR 5$"* = 000751 
14 206 155356 8S: #160000, SRO i CLEAR ERROR BITS IN SRO 
1405 022214 #400,R :FORM NEXT PLF VALUE FOR KIPDR4 
1406 022220 062700 #100.R0 ;FORM FIRST VIRT. ADDR. FOR THAT PLF VALUE 


BSSSSRASSSSEEESEER SS 
Seoc8 


SEs 
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1407 022224 
14 


MACRO kB O5=DEC=79 14:41 
PAGE LENGTH FAULTS=-DOWNWARD EXPAN 


2s 


(KSP) +, TRAPPC 
(KSP) +, TRAPPS 
SRO WASSRe 
#160000, SRO 


Mm 3 
PAGE 19-4 


;BRANCH BACK AND “eae: - VBA'S FOR 
;THE PLF VALUE JUST 
;SAVE PC & PS OF TRAP 


;SAVE CONTENTS OF SRO FOR ERROR 
7SAVE CONTENTS OF SR2 FOR ERROR 
7CLEAR ERROR BITS IN 


N_SRO 
+7 [GOT PG. LENGTH ABORT BEFORE IT WAS EXPECTED 
;FOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR 7 WITH 


240 

016746 TRAPPS ,=(KSP) ‘PUT PC & PS OF TRAP ON STACK 
016746 1567 MOV TRAPPC ,~(KSP) 

1e3t 022272 000002 ;RETURN FROM UNEXPECTED ABORT 


1422 022274 012767 e MOV #1$,SLPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
1423 022302 012767 002466 MOV #MGMERR ,MMVEC RESTORE NORMAL TRAP HANDLER 
1424 ADDRESS TO M.M. TRAP VECTOR 


J LURE EE EERE EEE REE EERE EEEREREEEEEEKREKRKKKE 


s*TEST 6 SR2 BIT TEST 


THIS TEST CHECKS THE BITS IN MEMORY MANAGEMENT REGISTER ‘ BY 

CAUSING ‘READ-ONLY ABORTS'’ AT VIRTUAL ADDRESSES BETWEEN 100000 

TO 111000 (PHYSICAL ADDRESSES 060000-071000). KIPDR4 IS USED TO EXECUTE 
THE FOLLOWING FOUR WORDS OF CODE WHICH ARE MOVED THRU ~ wey 

010727 OV PC,(PC)+ ;THIS INSTRUCTION SHOULD CAUSE A R/O ABORT 
000000 ; VIRT - SHOULD BE LOCKED RP IN SR2 
a#3$ THRU MEMORY 


000137 JMP 
(ADDR. OF 3%) NOT OCCUR, 
IN WHICH CASE SR2 WILL NOT CONTAIN CORRECT ADDR. 


KAA EEEEEEEEEEKEEKEKKKEKE 


3;BE SURE PAR3 IS MAPPED 7 12-16K 


* 
* 
* 
* 
* 
* 
. 
* 
* 
. 
LA 
S 
$ 


T6: 


i 
1 


000600 


000600 
077406 
077402 147746 #77402, aa 
060000 


100000 #100006, RI 
022406 155670 


#3$, : 3$ 
022366 156522 9231? SET LOOP ON ERROR TOOIN TER TO 2% 
010727 : MO iti tRO)+ ;LOAD "MOV PC, (PC)+"' INSTRUCT ON AT ADDR. 


THRU 
INSTRUCTION AT VIRT. ADDR. 
IN CASE R/O VIOL. DOES NOT ABORT 

PROGRAM EXECUTION TO ‘PAGE 4 INSTRUCTIONS*’ 


1454 022406 
1455 022412 
1456 022420 
1457 022424 
1458 022426 
1459 
1460 
1461 
1462 022430 


#KERSTK ,KSP 
Sie - WASSR2 
aie 1,WASSR2 


+13 


#160000, SRO 


FER 
“RESTORE STACK POINTER 
;READ CONTENTS OF STATUS REG 2 
S ADDR. OF ‘RELOCATED - R/O ABORT’’ LOCKED UP? 


c ES 
'SR2 DID NOT LOCK UP VIRTUAL ADDR. OF R/O VIOL. 
iFOR TIGHTER SCOPE LOOP 

EPLACE ERROR CALL WITH 


‘cEEAR THE ERROR BITS IN SRO 





CKKTBBO 11/44 MEM MGMT 
T6 SR2 BIT TEST 


1463 022436 


1467 
1468 022454 
1469 022462 
1470 022470 
1471 


22476 


1495 022546 
1496 022550 
1497 
1498 
1499 
1500 022552 
150 2560 


1505 022600 


~~ ee 
DAA AADADIAYTAYTIV 


DNRARWVISSRIE 
Oooo oS 


103745 


012767 
012767 
012767 


0225 
156522 


022610 


N 
MACRO M1113 O5=DEC-79 14:41 PAGE Noa8 


#4 ,RO ;RESET : TO POINT TO yg By ng ADDR. TO LOAD 
#2,R1 iF ORM VIRTUAL rer THAT D BE LOCKED UP NEXT 
R1,4111002 HAVE ALL VBA'S 100000-113600- BEEN TESTED? 

2$ BRANCH IF NO 


SLPERR :RESET LOOP ON ERROR POINTER TO 1$ 
477406, KIPDR4 :RESTORE PDR4 TO R/W ACCE ESS 
MMGMERR , MMVE C ;RESTORE ADDRESS OF NORMAL M 

:TRAP HANDLER TO M.M. VECTOR’ 


J FAA E EER EE EERE REEREEREREEEEEREREEEREE 


ssTEST 7 MORE CHECKS OF SRO & SR2 


THIS TEST PERFORMS SOME ADDITIONAL CHECKS OF THE SRO & SR2 LOGIC. 
FIRST IT CHECKS THAT SR2 ‘'TRACKS’’ ALONG ACTING AS A VIRTUAL ADDRESS 
PROGRAM COUNTER. ALSO SRO & SR2 ARE LOCKED UP BY A PAGE LENGTH 
ABORT, THEN WITHOUT CLEARING SRO'S ERROR BITS, A R/O ABORT IS CAUSED. 
NO OND ABORT AND THE 


UT THE, PAGE LENGTH ABORT SOULD STILL BE LOCKED UP. 

SET’ IS EXECUTED TO VERIFY THAT SRO IS CLEARED 
AND SR2 IS UNLOCKED BY A RESET. AFTER MEMORY MANAGEMENT IS TURNED BACK ON, 
SR2 1S CHECKED TO SEE THAT IT iS TRACKING AGAIN. 


= REEEREKAEEEAEEEAEAAEAREEEEEEEREEEEEEEEAAEKAEEEEREREEEEEEEEEEREEEEEKE 


;MAP KERNEL PAGE 5 TO 12-16k 
#406. KIPDRG *SETUP PDR4 FOR PAGE LENGTH ABORT 
#77402, KIPORS *SETUP PDRS FOR R/O ABORT 
#2$,$LPERR [SET LOOP ON ERROR POINTER TO 2% 
SR2.WASSR2 TREAD SR2 TO SEE IF ITS TRACKING 
:PUT EXPECTED VIRTUAL PC IN R1 
R} , WASSR2 DID SR2 CONTAIN VIRTUAL PC AT 2$? 


+16 :SR2 NOT TRACKING CORRECTLY 
3FOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
2$"* = 000767 


#4$,SLPERR ‘set LOOP ON ERROR POINTER TO 4$ 
SR2 ,WASSR2 ;READ SR2 TO SEE IF ITS TRACKING 
#4$,R :PUT EXPECTED VIRTUAL PC IN R1 

R1,WASSR2 DID ane CONTAIN VIRTUAL PC AT 4% 
$ “BRANCH IF YES 


+16 :SR2 NOT TRACKING CORRECTLY 
;FOR TIGHTER SCOPE LOOP 
ZRE dae ERROR CALL WITH 
: = 000767 


#6$ ,SLPERR ; (oop ON ERROR POINTER TO 6$ 
#7$ ,MAVEC ; N M.M. TRAP VECTOR 
STMP1 :C E INDICATOR 


ABORT - TRAP TO 7$ 


Pues eeeennnnne 


—— 
™“ 


— gts “Geaeteacese 


156360 
156532 


~ 
ad 


a4100500 GE LENG 

#MKERSTK ,KSP RESTORE STACK POINTER AFTER ABORT 
SRO, $TMPO : SRO'S I T 

SR2,$TMP2 ; SAVE mee INF ORMAT 10N 

#8$ .MMVEC PUT ADDRESS OF 8$ IN M.M. TRAP VECTOR 
a#120000 CAUSE R/O ABORT ~ TRAP TO 8$ 

MKERSTK ,KSP RESTORE STACK POINTER AFTER ABOKT 
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— 
oO 


SRO, WASSRO ;READ SRO FOLLWOING SECOND KT ABORT 
READ SR2 FOLLOWING SECOND KT ABORT 
31S SRO STILL HOLDING INFO ON FIRST ABORT? 
BRANCH IF YES 
SET ERROR INDICATOR 
SDOES SR2 STILL HOLD PC OF FIRST ABORT? 
BRANCH IF YES 


;SET ERROR INDICATOR 
; WERE ~ OR SR2 CHANGED BY A SECOND ABORT? 


H IF NO 
ZONE OF STATUS REGS. CHANGED BY SECOND ABORT 
3FOR TIGHTER SCOPE LOOP 

;REPLACE ERROR CALL WITH 

;"BR 6$"' = 000726 


NUS 


mr 
NOUS WI 


UNISBS 


Wy 
ae 


ZCLEAR ERROR INDICATOR Ne 
ZEXECUTE A RESET, APPLYING AN “‘INIT 
156310 MOV SRO, WASSRO ;READ SRO 
WASSRO :WAS SRO CLEARED BY THE RESET? 


$TMP1 :SRO NOT CLEARED BY A RESET 
156274 : SR2,WASSR2 TREAD SR2 
156266 #128, WASSR2 iWAS SR2 UNLOCKED BY A RESET? 


;BRANCH iF 
;SR2 NOT UNLOCKED BY A RESET 
;WERE SRO & SR2 BOTH ‘RESET’ BY A RESET? 
:BRANCH IF YES % 
:SRO OR SR2 NOT ‘RESET'’ BY A RESET 
iFOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
6S" = 000676 


Faxes eee 


rea Ss 


SRO TURN MEMORY MANAGEMENT BACK ON 
SR2 ,WASSR2 SR2 TO SEE IF ITS TRACKING AGAIN 
#15$,R1 ;PUT EXPECTED VIRTUAL PC IN R1 
R1,WASSR2 DID SR2 CONTAIN VIRTUAL PC AT 15% 
168 “BRANCH IF YES 
+16 ;SR2 NOT TRACKING CORRECTLY 
[FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
;BR 6$"" = 000663 


#1$,$LPERR SRESET LOOP ON ERROR — TO 1$ 
ZRESET PDR4 TO 128 BLKS, R/W 
ZRESET PDRS TO 128 BLKS, R/W 
155152 RESTORE ADDRESS OF NORMAL MEMORY 
;MANAGEMENT TRAP ROUTINE TO M.M. VECTOR 


RAPA LS 
oo 


Ow 
won 


ges 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


S&S 
Nw 
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T10 SUPER/USER ABORT PICKS UP KERNEL VECTOR 


1579 FRA A EAE AEE EERE ETE EE AERA E RARER REEAREREREEEREEREREREE 


TATEST 10 SUPER/USER ABORT PICKS UP KERNEL VECTOR 


THIS TEST CHECKS TO BE SURE THAT WHEN AN ABORT OCCURS WHILE 
SUPERVISOR OR USER MODE, THE TRAP VECTOR INFORMATION 


0 IS THEN MAPPED TO 1k, TEST 
IS REPEATED FOR SUPERVISOR MODE. AN ODD ADDRESS ERROR IS 
USED TO CAUSE A TRAP TO ‘4"’. 


REAR AEEEEEEEREEEEEAEEAEEEEEAEAEEAAEEKEEEEAEREEEAEEEREREEREKEKEKKEE 


re 

004767 15722 PC, TOFF 3; TURN OFF T-BIT TRAPPING FOR THIS TEST 
012767 155776 #2$,$LPERR 3SET LOOP ON ERROR POINTER TO 2$ 
005067 154660 : PSW TO KERNEL MODE 

012706 001100 #KERSTK ,KSP SETUP KERNEL STACK PTR. 


TEST USER MODE ABORT 


012767 000600 154510 #600 ,UIPARO an USER PAGE 0 TO 12k 
#6$, aN OAD KERNEL VECTOR 4 (LOC.4) WITH 4$ 
000006 :LOAD VECTOR+2 WITH NEW PSW 
154624 TO USER MODE 
ZSETUP USER STACK PTR. 
000004 #3$ 084 ;LOAD USER VECTOR 4 as aa WITH 3% 
000 000006 ;LOAD VECTOR+2 WITH NEW P 
94 023172 005767 000001 3$+1 E TRAP TO *%** 
95 ; SHOULD I 


96 NOT PC=3$ FROM USER LOC. 4 (=60004) 
97 023176 3 SAVE PSW FOR ERROR 
023202 010602 SP,R2 ZSAVE VALUE OF STACK POINTER FOR ERROR 
023204 CL BE SURE BACK IN KERNEL MODE 
D Geser0 ;DID NOT TRAP THRU KERNEL SPACE 
:FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
2$"" = 000740 


‘Be SURE BACK IN KERNEL MODE 
= RESTORE KERNEL _S.P. IN CASE IT CHANGED 
a USER PAGE 0 TO 0-4Kk 


:GO TO USER MODE 
#USE STK 5USP SRESTORE USER STACK POINTER 
PSwW :GO BACK TO KERNAL MODE 


NOW TEST THE SUPERVISOR MODE ABORT 


146766 ;MAP SUPERVISOR PAGE , TO 12k 
000004 #6$,a%6 “LOAD KERNAL VECTOR 4 WITH 6$ 
000006 *LOAD VECTOR+2 WITH NEW PSW 
154502 0060, PSw *GO TO SUPERVISOR MODE 
#SUPSTK, SSP [SETUP SUPERVISOR STACK PTR 
000004 #5$, aK : S SOR VECTOR 4 (LOC. 60004) WITH 5$ 
000006 MOV #346, aN6 : NEW PSW 
+ 


wu: ap epee eeenenne 


me Be He Be Be Be Se Se Be Ge He Be © 


154542 


st E 
SHOULD PICK UP NEW PC=6$ FROM KERNEL 
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1626 023332 
1627 
1628 
1029 
1630 023334 


1636 366 
1637 023374 
1638 023402 


1646 


023406 
1647 
1648 023410 


1659 023460 
1660 
1661 
1662 
1663 023462 
1664 023466 
1665 023470 
1666 023474 
1667 023476 
1668 


016701 
060 


000004 
012767 


022702 
001403 
012702 
000752 
012767 


154452 
154444 


156754 


023422 
170000 
154350 
000340 
023440 
154332 


007437 
154322 


050000 
050000 
023410 


MACRO M1113 _— -79 14:41 


155472 


155404 


5$: 


6$: 


PSW 

MKERSTK ,KSP 
SIPARO 
#40000 ,PSW 
#SUPSTK ,SSP 


PSW 
#TIMERR 44 
#1$,SLPERR 


D 4 
PAGE 20-1 


;LOC. 4, NOT PC=5$ FROM SUPERVISOR LOC. 4 (=60004) 
TSAVE PSwW FOR ERROR 

7SAVE VALUE OF STACK POINTER FOR ERROR 

7BE SURE BACK IN KERNEL MOD 

:DID NOT TRAP THRU KERNEL SPACE 

FOR TIGHTER SCOPE LOOP 


;REPLACE ERROR CALL WITH 
;'BR 2$°' = 000740 


BE SURE BACK IN KERNEL MODE 

RESTORE KERNEL S.P. IN CASE IT CHANGED 
[REMAP SUPERVISOR PAGE 0 TO 0-4k 

GO TO SUPERVISOR MODE 

SRESTORE SUPERVISOR STACK POINTER 

;GO BACK TO KERNEL MODE 
SRESTORE ADDR. OF NORMAL CPU TRAP HANDLER TO 4 
[RESET LOOP ON ERROR POINTER TO 1$ 


[TURN T-BIT TRAPPING BACK ON 


LAER ERE EEE EERE EEE REE EEEEEEEEEREREEEEREREEEEEEREEEE 


RTI IN SUPER/USER MODE DOES NOT CHANGE PSW 
THIS TEST CHECKS TO SEE THAT WHEN AN RTI IS EXECUTED IN SUPERVISOR 


OR USER MODE, 


:*TEST 11 

- 

3* 

a 

TST11: SCOPE 

1$: MOV 
MOV 

2$: MOV 
MOV 
MOV 
RTI 

3$: MOV 
BIC 
CLR 
CMP 
BEQ 
ERROR 

4$: CMP 
BEQ 
MOV 
BR 

5$: MOV 


#2$,$LPERR 
#170000, R2 


R2,P 
#340. (SP) 
#3$,-(SP) 


PSW,R1 
#7437,R1 
PSW 


R2,R1 
4$ 
+32 


#50000 ,R2 
#50000 ,R2 
2$ 
#1$,$LPERR 


THE MODE OR PRIORITY BITS OF THE PSW ARE NOT CHANGED. 


;SET LOOP ON ERROR POINTER TO 2$ 
[LOAD "PRESENT & EXPECTED'' oy VALUE INTO R2 
:GO TO PRESENT MODE-PRIORITY 0 
:PUT A_NEW PSW (PRIORITY=7) ON STACK 
T NEW PC ON THE STACK 
:D0 AN RTI FROM PRESENT MODE 
[READ NEW PSW INTO R1 
;MASK OFF COND. og TF elt AND UNUSED BITS 


:GO BACK TO KERNEL 
:DID PSW STAY IN PRESENT MODE, PRIORITY=0? 
:BRANCH IF YES 
:PSW CHANGED BY AN RTI. FROM USER 
;FOR A TIGHTER SCOPE L 
iRE PLACE ERROR CALL With 
;'BR=2$"" = 000760 
:1F SUPERVISOR MODE HAS BEEN CHECKED, 
ND OF TEST 


7G0 TO E 

SELSE,SET SUPERVISOR MODE, 

AND BRANCH BACK TO TEST IT 

[RESET LOOP ON ERROR POINTER TO 1$ 


SEQ 0042 


E 4 
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KT ERROR NOT SERVICED IF ODD ADDR. SEQ 0043 
1681 RRA AAEEAREERERKEEKREEREEEEERE 
TRTEST 12 KT ERROR NOT SERVICED IF ODD ADDR. ERROR 
** 
i* THIS TEST ‘we: TO SEE THAT A A CERTAIN VIRTUAL ADDRESS THAT 
s* WOULD CAUSE A MEMORY MANAGEMENT ERROR CAUSES AN ODD ADDRESS 
hed ERROR FIRST, THE ODD wa ERROR IS SERVICED BUT THE MEMORY 
3* MANAGEMENT ERROR 5 A THIS MEANS THAT SRO AND SR2 
3* SHOULD NOT REPORT THE E RROR OR LOCK UP ITS VIRTUAL ADDRESS. 
3* —_- VIOLATION IS USED AS THE POTENTIAL MEMORY MANAGEMENT 
** 
+ SERRE EERE EERSTE EEE EEE EE ree een ee ttnit 
023504 000004 TST12: SCOPE 
1682 023506 012767 000600 146634 1$: MOV #600 ,KIPARS MAP KERNEL PAGE 4 TO 12-16K 
1683 023514 012705 077402 MOV #77402, RS ;LOAD PDR4 DATA INTO R5 
1684 023520 010567 146564 MOV RS KIPDR4 *MAP PAGE 4 READ-ONLY 
1685 023524 012737 023554 000004 MOV HSS ,a#4 :SET CPU TRAP VECTOR TO ADDRESS OF 4$ 
1686 023532 012737 023552 000250 MOV #3$,a#250 7SET M.M. TRAP VECTOR TO ADDRESS OF 3$ 
1687 023540 012767 023546 155342 MOV #2$,$LPERR SET LOOP ON ERROR POINTER TO 2$ 
1688 023546 005267 034227 23: INC 60001 ; CAUSE ODD ADDR. ERROR & POTENTIAL R/O J yoo 
1689 023552 104020 3$: ERROR +20 : TRAPPED THRU M.M. VECTOR BUT SHOULDN'T HAVE 
1690 ;FOR TIGHTER SCOPE LOOP 
1691 7REPLACE ERROR CALL WITH 
1692 :'BR 2$°' = 000776 
1693 023554 012706 001100 4$: MOV #KERSTK,KSP REST TORE STACK POINTER AFTER TRAPPING 
1694 023560 5067 155414 CLR $TMP1 ;CLEAR ERROR INDICATOR 
1695 023564 016767 154002 155472 MOV SRO, WASSRO *READ STATUS REG. 0 
1696 023572 016767 154000 155470 5$: MOV SR2,WASSR2 SREAD STATUS REG. 2 
1697 023600 012700 000017 MOV #17,R0 :LOAD EXPECTED SRO CONTENTS INTO RO 
1698 023604 020067 155454 CMP RO, WASSRO SRO ERROR BITS LEFT CLEAR BY TRAPPING? 
1699 023610 001402 BEQ 6$ BRANCH IF YES 
1700 023612 005267 155362 INC STMP1 ;SRO ERROR BITS SET WHEN ODD ADDR. SERVICED 
1701 023616 012701 023572 6$: MOV #5$,R1 *LOAD EXPECTED SR2 CONTENTS INTO R1 
1702 023622 020167 155442 CMP R1,WASSR2 WAS SR2 LEFT UNLOCKED BY TRAPPING? 
1703 023626 001402 BEQ 7$ SBRANCH IF YES 
1704 023630 005267 155344 INC $STMP1 :SR2 LOCKED UP BY ODD ADDR. ERROR 
1705 023634 005767 155340 7$: TST STMP1 * WHERE SRO OR SR2 EFFECTED? 
1706 023640 001404 BEQ 8$ ;BRANCH IF NO 
1707 023642 104021 ERROR +21 :SRO OR SR2 CHANGED BY ODD ADDR. ERROR 
1708 sFOR TIGHTER SCOPE LOOP 
1709 >REPLACE ERROR CALL WITH 
1710 :'BR 2$"' = 000741 
1711 0623644 042767 160000 153720 BIC #160000 , SRO :CLEAR ERROR BITS THAT MAY BE SET IN SRO 
1712 023652 012737 002414 000004 8$: MOV #TIMERR ,a@&4 sRESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
1713 02 012737 002466 000250 MOV #MGMERR , 84250 sRESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
1714 023666 012767 077406 146414 MOV #77406, KIPDR4 sREMAP PAGE 4 TO READ/WRITE 
Lay 023674 012767 023506 155206 MOV #1$, $LPERR SRESET LOOP ON ERROR POINTER TO 1$ 
1731 
1732 DL EEA AAA REE RARER EERE EAA ERES 


i*TEST 13 PC & PSw SAVED FOR KT ERROR ON ODD ADDR. 


* 
ge THIS TEST CHECKS THE PC AND PROCESSOR STATUS WORD SAVED WHEN 
be A_KT ERROR OCCURS DURING THE SECOND PUSH ON THE STACK DURING 
§* SERVICING OF AN ODD ADDR. ERROR. DURING A a E ERROR’’ 
3 SEQUENCE SUCH AS THIS, THE PSW SAVED WILL BE THE ONE PICKED UP 
a FROM VECTOR+2 (LOC. 6 IN THIS CASE) AFTER THE FIRST TRAP, 





F 4 
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13 PC & PSwW SAVED FOR KT ERROR ON ODD 


NOT THE PSW PRESENT BEFORE THE FIRST TRAP. SRO AND SR2 
SHOULD RECORD THE KT ERROR (A R/O VIOLATION BY THE USER STACK PTR.) 


NOTE THAT THE PREVIOUS MODE BITS <13:12> OF THE PSW 
WILL BE SET IN THE PSwW THAT IS SAVED. 


RRR ERARAREERAEAREEEEREAEREKRERERKRKKRRKEE 


rs 
; TURN T-BIT gh he THIS TEST 


wor: see eee 


med meg Be Be Be Be Be Oe 


;MAP USER PAGE 4 READ/WRITE 
; LOAD ADDRESS OF 4$ IN CPU (ODD ADDR.) VECTOR 
THAT SHOULD BE PUT ON yore My VECTOR+2 


; EC+2 
[SET LOOP ON ERROR POINTER TO 2$ 


[GO TO USER MODE 
4 024004 100002 ‘SET USER STACK PTR. SO SECOND PUSH IS IN PG. 3 
024010 : 100005 ‘CAUSE ODD ADDRESS ERROR THAT WILL CAUSE 
*R/O ERROR WHEN TRY TO SAVE OLD PC 
024014 : 2(KSP) ,R1 ‘PUT PSW SAVED ON KERNEL STACK INTO R1 
(KSP) ,R3 ‘PUT PC SAVED ON KERNEL STACK INTO R3 
SRO, WASSRO “READ THE CONTENTS OF M.M. STATUS REG. 0 
SR2.WASSR2 ‘READ THE CONTENTS OF M.M. STATUS REG. 2 
#160000, SRO [CLEAR THE ERROR BITS IN SRO 
PSW [BE SURE IN KERNEL MODE 
#KERSTK ,KSP SRESTORE KERNEL STACK POINTER 
#140000.PSW :GO TO USER MODE 
MUSESTK.USP ;RESTORE USER STACK POINTER 
PSW TO KERNEL MODE 


$TMPO ; CATOR 
R1,4170017 ;WAS THE PSwW SAVED THE ONE PICKED UP BY THE 
ODD ADDR. TRAP FROM ERRVEC+2? 
[VALUE 170017 = PSw FROM LOC. 6 WITH 
1 ;PREVIOUS MODE BITS = USER 
aoe ioe 5$ BRANCH IF YES 
0241 $TMPO ;WRONG PSW SAVED DURING ‘DOUBLE ERROR’ SEQUENCE 
094110 : R3,43$+4 [WAS THE PC AT THE TIME OF THE ODD ADDR. ERROR 
SAVED ON THE STACK? 
024114 6$ BRANCH IF YES 
$TMPO ;WRONG PC SAVED DURING TRAP SEQUENCE 
020147 :  eneameanlate- ;DID mn! ae i - USER, PAGE 3, R/O ABORT? 


$TMPO SRO DID NOT REPORT R/O ABORT 
024010 : WASSR2 ,#3$ :DID SR2 LOCK UP VIRTUAL ADDR. OF LAST 
deta paceman FETCHED? 


8$ 
$TMPO ;SR2 DID NOT LOCK UP ADDR. OF ODD ADDR. INST. 
$TMPO ANY "ERRORS'’ DURING TRAP SEQUENCE ? 


9$ ; H IF NO 
+22 ; WR C_ OR PSW WERE SAVED 
D ADDR. - KT TRAP 
QUENCE 
“FOR TIGHTER SCOPE LOOP 








3. 4 
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113 PC & PSw SAVED FOR KT ERROR ON ODD ADDR. 


7 REPLACE ERROR CALL WITH 
2s"’ e's Gh 0 


000004 9$: ATIMERR a6 “RESTORE ADDRESS OF NORMAL CPU TRAP HANDLER 
#340, aré RELOAD pth WITH KERNEL PSwW 
000250 a#250 RESTORE ADDRESS OF NORMAL M.M. TRAP HANDLER 
153374 477006, UIPDR3 REMAP USER PAGE 3 READ/WRITE 
154670 #1$,$LPERR ;RESET LOOP ON ERROR POINTER TO 1$ 
PC, TON ; TURN T-BIT TRAPPING BACK ON 





H 4 
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PC & PSwW SAVED FOR KT ERROR ON ODD ADDR. 


7 eNeT eNoL oNoLoNoLoNoleNol Nol eNoLeNol Nol oNoLaNeleNeLaNoLeNoLe\eleNeFe\oFe\ 
TTL 6 DSPACE TESTS 
7. NA Nea NoSeNoZ Nol eNoleNol eNoL Nol eNoLeNoLeNoL Nol eNeLeNeLeNeF Nel e\oFe\ 


FERRARA AAA ER AAAERAEEEEAARE TERE A AERA EREREREREEEREREEERERERAEE ES 


ssTEST 14 ENABLE D-SPACE AND SEE THAT I-SPACE iS FORCED 


THIS TEST SHOWS THAT I=SPACE IS FORCED DURING INSTRUCTION 4 Oreo 
AND ADDRESS, INDEX AND OPERAND FETCHES IF THE REGISTER FIELD IS 7 


ALL es FOUND IN THIS TEST ARE REPORTED WHEN THE CPU 
ABORTS THRU ‘MMVEC*’ TO SUBROUTINE ‘NODSPAC’’. THIS SUB- 
ROUTINE WILL REPORT THAT D-SPACE WAS NOT ENABLED PROPERLY. 


NOTE - vee ee & wo Mor 6,7 1S SHOWN, AND THE OPERAND iS 
"100000", I-SPACE IS FORCED IN THE OPERAND FETCH, 
BUT D-SPACE WILL BE FORCED ON THE ACCESS OF THE 
LOCATION; CORRECT OPERATION IS CHECKED. 


PETTITT TILL LIL i iii iii iii iii 
714: SCOPE 
ty pha | KERNAL I/D SPACE PAR'S AND PDR'S 
CLR MMRO ; TURN OFF MEMORY Ag = me 
SAKE KERNAL D-SPACE PGS. 1,283 11> cement 
AND KERNAL I-SPACE PDR4 NON-RESIDEN 


—4s eee tree Yee ee 
we: =e eee eee eee e 


024224 


zMAP KDPARS TO 12->16K 
#NOD seer M.M. VECTOR TO D=SPACE SERVICE ROUTINE 
as. F , SLPERR Set LOOP See tes POINTER TO 10$ 


00526 MMR ON ME MANAGEMENT 
012767 0000 MOV #26 ,MMR3 ENABLE 22-BIT,KERNAL D-SPACE MAPPING 
+ TEST THAT INSTRUCTION FETCHES FORCE [-SPACE 


000400 $ BR 4$ ;BRANCH 
000244 4$: CLEAR ZERO BIT IN PSW 


001776 BEQ 4$ NO BRANCH 
: 2 SET ZERO BIT IN PSW 
BRANCH 


000264 : 

001376 BNE 5$ 

000270 : SSET NEGATIVE BiT IN PSW 
1ee! 024326 100376 


BPL 6$ NO BRANCH 
} TRY SOME SOP INSTRUCTIONS WITH SRCM=DSTM=0 
1833 ; THESE SHOULD NEVER INVOKE D~SPACE 


1834 
1835 024330 005700 TST RO 
1836 024332 005200 INC RO 








pa tese 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 5; 
ENABLE D=SPACE AND SEE THAT I-SPACE IS FORCED 


1838 024334 005300 

006000 

006100 
1841 024342 005067 153224 CLR MARO F MEMORY MANAGEMENT 
184 : TEST SOB NON-MOD WITH pstmeo 3° 6,7; DSTF=7 


1844 024346 012737 2 060000 ° MOV #100002,a#60000 ;SET UP TEST LOCATION 
1845 024354 012767 024 154526 MOV #11$,$LPERR ‘SET LOOP ON ERROR POINTER TO 11$ 
1846 024362 005267 04 INC MRO STURN ON MEMORY MANAGEMENT 
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11$: 


NON-MOD 
MMRO URN_OFF MEMORY MANAGEMENT 
TEST SOB MOD WITH DSTM=2, t 6,7; DSTF=7 


1854 
1855 024412 154470 #12$,$LPERR 7SET LOOP ON ERROR POINTER TO 12$ 
1856 024420 1 060002 #100000 ,a#60002 ;SET UP TEST VALUES 

1857 0244 6 rRO TURN ON MEMOR 


; TURN OFF MEMORY MANAGEMENT 


THE NEXT THREE TESTS ARE CONCERNED WITH TESTING 
DOP AND NOT (SRCM=DSTM=0) 


TEST DOP DEST NON-MOD SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 


012767 #13$,$LPERR :SET LOOP ON ERROR POINTER TO 13$ 
060002 #100000,a#60002 SET UP TEST VALUE 
RO STURN ON MEMORY MANAGEMENT 
SRM 2 gee DOP NON-MOD 
024504 100000 100000 31100060,3410 a4#100000 ; M=3 DOP NON-MOD 
1874 024512 3260 100000, 160000 Sheree bse DOP NON-MOD 
1875 024520 @100002 ,a@100002 ;SRCM=7 DSTM=7 DOP NON-MOD 
1876 024526 005067 153040 CLR MMRO TURN OFF MEMORY MANAGEMENT 
1877 2 TEST MOV DEST we NOT (SRCMEDSTM=0) 
1878 ; SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 


1880 024532 #14$,$LPERR :SET LOOP ON ERROR POINTER TO 14% 
1881 024540 100000 060002 #100000 ,a#60002 3SET UP TEST VALUE 
1 4 5267 pAb ON MEMORY MANAGEMENT 

<SRCM=2 DSTM=2 MOV 

:SRCM=2 DSTM=3 MOV 

:SRCM=2 DSTM=6 MOV 

*SRCM=2 DSTM=7 MOV 

TURN OFF 


CLR MMR MEMORY MANAGEMENT 
TEST DOP DEST MOD AND not SUB 
SRCM=DSTM=2,3,6,7; SRCF=DSTF=7 


#15$,$LPERR SET LOOP ON ERROR POINTER TO 15$ 
MMRO ; MEMORY MANAGEMENT 


#60000 , #60000 
#00000 ,a#100000 ; 


#00000 , 100000 
1896 02464 #00000 100002 SSREM=> DSTM=7 DOP MOD 
y+ 024650 005067 CLR MRO ; TURN OFF MEMORY MANAGEMENT 
1898 ; TEST SWAB WITH DSTM=2,3,6,7; DSTF=7 


1899 : 
1900 024654 #16$,$LPERR :SET LOOP ON ERROR POINTER TO 168 
1 060000 Mg #100002 ,a#60000 : sSET UP TEST VALUES 
MMRO ON MEMORY MANAGEMENT 

060000 : #60000 ‘OS TNE SWAB 
1904 024700 a4#100002 *DSTM= SWAB 
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053072 SWAB —«- 100002 sDSTM=6 SWAB 

053064 SWAB @100000 *DSTM=7 SWAB 

152652 CLR MRO TURN OFF MEMORY MANAGEMENT 
; TEST ROT/SHFT WITH DSTM=2, 3.6.7; DSTF=7 


024740 154162 #17$,,SLPERR ;SET LOOP ON ERROR POINTER TO 17% 
100000 060002 MOV ALUES 
152632 
060000 


oo 
RPP E 
a ie | 
—} ed 

oO 


#100000 ,a4#60002 SET UP TEST VAL 
Al’ : TURN ON MEMOR 
#60000 
100000 a#100000 
053024 


100000 : 
053022 @100002 :DSTM=? ROT/SHET 
152606 CLR MMRO F MEMORY MANAGEMENT 
; TEST ASH/ASHC WITH pstme®. Fa} 6, A DSTF=7 


025012 154116 #18$,SLPERR :SET LOOP ON ERROR POINTER TO 18$ 
000001 060000 #1 an :SET UP TEST VALUES 
060002 #100000 ,a#60002 


100000 
152560 MRO ; TURN ON MEMORY MANAGEMENT 
000001 ASH #1,RO [DSTM=2 ASH/ASHC 
a#100000 ;DSTM=3 ASH/ASHC 
100000,RO 
@100002,RO 


CLR MAR ; TURN_OFF 
TEST MUL/DIV WITH DSTM=2,3,6,7; DSTF=7 


1930 : 
1931 025036 MOV #19$,$LPERR :SET LOOP ON ERROR POINTER TO 19$ 
1932 025044 005267 INC MARO- STURN ON MEMORY MANAGEMENT 
MUL #2,R0 :DSTM=2 MUL/DIV 
MUL a#100000,RO 
MUL 100000,RO 
1936 025064 MUL @100002,,RO 
1937 025070 CLR MRO ‘TURN OFF MEMORY MANAGEMENT 
1938 ; TEST JMP WITH DSTM=3,6,7; DSTF=7 


1939 ; 
1940 025074 #20$,,SLPERR ;SET LOOP ON ERROR POINTER TO 20$ 
060000 MOV #23$ ,a#60000 5 yA VALUES 


— YY oI 
WOWONAWUESWN—O N 
jelojlelel=) 


wowowovo 

SORN 

Wh 
oo 


1928 025032 
1929 


CLR MMRO ; TURN OFF MEMORY MANAGEMENT 
TEST SUB WITH DSTM=2,3,6,7; DSTF=7 


153746 MOV ogee SL PEAR ;SET LOOP ON ERROR POINTER TO 28% 


;SET UP TEST VALUES 
060002 #100000 ,a#60002 
MMRO ON MEMORY MANAGEMENT 
RO ,#60002 


RO. #100000 


052604 RO,a100002 UB 
152370 MMRO ; TURN OFF MEMORY MANAGEMENT 
024312 MOV #10$,,$LPERR SET LOOP ON ERROR POINTER TO START OF TEST 


PPITITTIITITITIT LITTLE LLL LLL LLL LLL 


;*TEST 15 ENABLE D-SPACE AND SEE I~SPACE IS NOT FORCED 


-* 
’ 
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1975 025236 
1976 


1977 
1978 025242 
979 025246 


Oooooo 


Secs 





THIS TEST SHOWS THAT I=SPACE IS NOT FORCED IF THE REGISTER FIELD 
IS NOT 7, BUT THE OTHER CONDITIONS ARE MET. 


'* 
-* 
-* 
;@ ALL ERRORS +e * THIS TEST ARE REPORTED WHEN THE CPU ABORTS 
;* THROUGH "MMVEC' TO SUBROUTINE ‘NODSPAC’. THIS SUBROUTINE WILL 
;* REPORT THAT DoSPACE WAS NOT ENABLED PROPERLY. 

:* 

§ 


REE EEEEAEEAEEAEEAARARERAERAAEEEERREREEEEEREEEKKREKH 


115: 


i 


;SET LOOP ON ERROR POINTER TO 1$ 


URN ON MEMORY MANAGEMENT 
NON-MOD 


STM=7 SOP NON-MOD 
MMRO ; TURN OFF MEMORY MANAGEMENT 
TEST SOP MOD; DSTM=1,2,3,5,7 


153524 ~ #2$ ,SLPERR zSET LOOP ON ERROR POINTER TO 2$ 
MRO TURN ON MEMORY MANAGEMENT 


CLR MRO “TURN OFF Y MANAGEMENT 
TEST DOP DEST NON-MOD WITH SRCM=1,2 aa: 5,7 AND DSTM=1,2,3,5.7 
ALL SOURCE MODES TO BE TESTED ARE TESTED HERE 


#3$,SLPERR 7SET LOOP ON ERROR POINTER TO ie 
#32 Re 7SET UP ADDRESSES 60000-60064 FOR TEST 


000002 


060000 RO 
152120 MMRO 7 TURN ON MEMORY MANAGEMENT 
: MP (RO), (RO) >SRCM=1 DSTM=1 DOP DEST NON-MOD 


— 
~ 
LS 


F 


Se 
Ooo 
as 
BY 


SENSBRE 


SOSSSSSSessss 
SRR 


SSBS NSO RESSS 


=] 
Nm 
aleabeabeaheal 


pe 
BEAN 
S888 
MMA 
BY IIS 
RNSaNS 


ee 
SBE 

SLVR 
vai 
~ 


2074 025712 
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D=SPACE AND SEE I-SPACE IS NOT FORCED 


) ,@-(RO) 
),@0(RO) 


CLR 
TEST DOP 


153310 


SET UP CONSTANTS FOR TEST 


7SET LOOP ON ERROR POINTER TO 4$ 
;T ON MEMORY MANAGEMENT 


MOD 
MORY MANAGEMENT 


CLR MMRO ;TURN OFF ME 
TEST MOV DEST AND NOT(SMO AND DMO); DSTM=3,5,7 


#60000 ,R1 
060002 060000 #60002 ,a#60000 
025650 153244 #5$ puree 


151722 
RO,a(R1)+ 
RO,@-(R1) 
000000 RO,a0 
151706 


060000 . #60000,R1 
025702 153212 #6$,$LPERR 
151670 mr6 


CLR 
TEST SWAB; DSTM=1,2,3,5, 


SET UP CONSTANTS FOR TEST 

7SET LOOP ON ERROR POINTER TO 5$ 
:T MEMORY MANAGEMENT 
z;DSTM=3 MOV DEST 

z;DSTM=5 MOV DEST 


;DSTM=7 MOV DEST 
hay OFF MEMORY MANAGEMENT 


SET UP CONSTANTS FOR TEST 
SET LOOP ON ERROR POINTER TO 6$ 
; TURN ON MEMORY MANAGEMENT 


DSTM=7 SWAB 
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2075 025716 151650 CLR MMR O TYAN OFF MEMORY MANAGEMENT 
2076 TEST ROT/SHFT; DSTM=1,2, 5 


#60000 ,R1 SET UP CONSTANTS FOR TEST 
Re R3 “Re 


,@460000 
#60002, 7a#60002 
60004 


060000 
060006 


060000 
060002 
060004 


060006 
025776 
151574 


#60006 , 2460006 
#7$,$LPERR ;SET LOOP ON ERROR POINTER TO 7$ 
mmrd TURN ON MEMORY MANAGEMENT 


Cesessz88ssssss 


000000 
151554 CLR MRO ; TURN OFF MEMORY MANAGEMENT 
; TEST MUL/DIV; DSTM=1,2,3,5,7 


026032 MOV #8$ ,SLPERR ;SET LOOP ON ERROR POINTER TO 8$ 


CLR R3 7SET UP CONSTANT FOR it 
151540 ae ON MEMOR 


CLR MRO TURN OFF MEMORY MANAGEMENT 
TEST ASH/ASHC; DSTM=1,2, $5.7 


SET UP CONSTANTS FOR THE TEST 


4 LOOP ON ERROR thes TO 9$ 
ON MEMORY MANAGEMENT 
:Dsie=1 ASH/ASHC 


S88 
Ss 


Oooooo 
— ns 


CLR MMR ; TURN OFF MEMORY MANAGEMENT 
TEST JMP; DSTM=3,7 


152756 ales - SLPERR ;SET LOOP ON ERROR POINTER TO 10% 
060000 a4#60000 7SET UP CONSTANTS FOR THE TEST 
060002 W128 ;a#60002 


#60060,R1 


ORI) 
@0(R1) 


CLR MMRO 
TEST JSR; DSTM=3,7 


152712 MOV #13$,$LPERR ;SET LOOP ON ERROR POINTER 3 13$ 
060000 #14$ ,a#60000 SET UP CONSTANTS FOR THE TEST 
060002 #15$,a#60002 


scsccec 
bs 
Wnrononon 


; TURN ON * Sted MANAGEMENT 


88 


IMP 
STURN OFF MEMORY MANAGEMENT 


NOPNPONINGNDNNDNYNDNNININDAININININININININN 


w NMononony’ Nong 2 2 2 2 oe 





TBBO 11/44 MEM MGMT PRT B MACRO M1113 nih -79 14:41 PAGE B.-8 5 
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#60000 ,R1 
MRO ee oe MEMORY MANAGEMENT 
PC,a(R1)+ ‘SIMs JSR 
PC ,A0tR?) ZDSTM=7 JSR 
mo [TURN OFF MEMORY MANAGEMENT 
6, KIPDRS ZMAKE KIPDR3 RESIDENT 
012706 001100 PRERSTK KSP RESET STACK POINTER 
012767 025242 #20$,$LPERR ;SET LOOP ON ERROR POINTER TO START OF TEST 


SERRE E RAE EEEEEREREREEEEREREREHERERERERERRERERKRKKRKEREKEK 


;*TEST 16 PROPER ENABLING OF SUPER. D-SPACE 
THIS TEST CHECKS FOR PROPER ENABLING OF THE SUPERVISOR D-SPACE. 


ANY ERRORS Tecate WILL BE REPORTED THROUGH ‘MMVEC’ TO 
SUBROUTINE "NODSP. 


SAREE EERE SEEKER EKEEEEKAEKEEKEEEAEREKERKKKKKKKKKKEK 


026254 000004 
2150 026256 105067 143740 :MAKE SDPDR1 NON-RESIDENT 
026310 ‘SET LOOP ON ERROR POINTER TO 1$ 
000022 #22 .MAR3 TENABLE 22-BIT SUPERVISOR D-SPACE 
040000 #40090,PSwW ; ENABLE SUPERVISOR MODE 
151262 INC MRO TURN ON MEMORY MANAGEMENT 
: THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE D-SPACE 


MnoNsnoNoNnerorefyro 


ou oneness: 
w 


ie eee ee 
—T 

— 
oa 


5200 
005067 151250 MMRO TURN OFF MEMORY MANAGEMENT 
112767 000006 143672 MAKE SDPDR1 RESIDENT 
105067 143652 CLRB SIPDR3 3;MAKE SIPDR3 NON-RESIDENT 
; TEST SOP INSTRUCTIONS 


012767 026346 152546 #3$,SLPERR :SET LOOP ON ERROR POINTER TO 3$ 
267 mmard “TURN ON MEMORY MANAGEMENT 
*DSTM=3 DSTF=7 SOP 
;DSTM=3 DSTF=7 SOP MOD 
2169 026356 CLR MRD * TURN OFF MEMORY MANAGEMENT 
2170 ; TEST DOP INSTUCTIONS 


2171 : 
2172 026362 152520 #4$,$LPERR :SET LOOP ON ERROR POINTER TO 4$ 
#60000 RO 3SET va CONSTANT FOR TEST 
“TURN ON MEMORY MANAGEMENT 
SSRCM=3 DSTM=1 DOP DEST NON-MOD 
SSRCM=2 DSTM=3 DOP DEST MOD 
060002 i SROM=3 DSTM=5 MOV DEST 
151150 CLR MRO TURN OFF MEMORY MANAGEMENT 
, TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 


026446 #5$ ,SLPERR ;SET LOOP _ON ERROR POINTER TO 5$ 
000001 060000 #1 ,8460000 >SET CONSTANT FOR TEST 
#1RO :SET UP CONSTANT FOR TEST 


000001 
151124 MAR O ; TURN ON MEMORY MANAGEMENT 
060000 3 ROL 2460000 :DSTM=3 ROT/SHFT 
2460000 ,R3 :DSTM=3 ASH/ASHC 
151110 MMRO ; TURN OFF MEMORY MANAGEMENT 





TEST MUL/DIV AND SWAB INSTRUCTIONS 


** 

152420 MOV #6$,SLPERR SET LOOP ON ERROR POINTER TO 6$ 
mar’ nN MEMORY MANAGEMENT 

@4#60000,RO :DSTM= MUL/DIV 

@#60004 


MRO : GE 
144000 #2,.MMR3 ‘DISABLE SUPERVISOR D-SPACE 
143462 MOVB  #6.SIPDR3 [MAKE SIPDR3 RESIDENT 
152356 #20$,$LPERR SSET LOOP ON ERROR POINTER TO START OF TEST 


SL RARER AAR EERE EEE EEE REE EERE EEAERREEEEEEEEREKERE EE 


;*TEST 17 PROPER ENABLING OF USER D~SPACE 
THIS TEST CHECKS FOR PROPER ENABLING OF THE USER D-SPACE. 


ANY ERRORS oe th a WILL BE REPORTED THROUGH "MMVEC" TO 
SUBROUTINE ‘NOD 


MASAAAALSZA£LA££A SEL ALASAAS ALAS SALES ESSA SEER S ERE ARERR ASRS ARES SD 


:MAKE UDPDR1 NON-RESIDENT 
;SET LOOP ON ERROR POINTER TO 1$ 
[ENABLE 22-BIT USER D-SPACE 

42] PSw ; ENABLE USER MODE 


INC MMRO TURN ON MEMORY MANAGEMENT 
THE NEXT INSTRUCTIONS SHOULD NEVER INVOKE DSPACE 


Mononononononononel ner 
od ath aah cod ead ead ad ed ad ed cd 
BLKSRAVLESE 

oO oo oO 


S 


Ow: #2 #8 2 
wn 


TA) 4h 6 Se Be Be Oe Be oe 
— 

—— 
N 


005200 
2218 026574 005067 150772 MMRO ; TURN OFF MEMORY MANAGEMENT 
2219 026600 112767 000006 151014 MAKE UDPDR1 RESIDENT 
2220 026606 105067 150774 CLRB UIPDR3 s;MAKE UIPDR3 NON-RESIDENT 
2221 ; TEST SOP INSTRUCTIONS 


2222 
2223 026612 012767 026624 152270 MOV #3$,S$LPERR :SET LOOP ON ERROR POINTER TO 3$ 
2224 026620 005267 150746 MRO > TURN ON MEMORY MANAGEMENT 
060000 @4#60000 ‘OSTA DSTF=7 SOP 
060000 3460000 *DSTM=3 DSTF=7 SOP MOD 
150732 CLR MRO [TURN OFF MEMORY MANAGEMENT 
TEST DOP INSTUCTIONS 


026656 152242 #4$,SLPERR :SET LOOP ON ERROR POINTER TO 4$ 
060000 #60000,RO ;SET UP CONSTANT FOR TES 
150714 MMRO “TURN ON MEMORY NY MANAGERENT 
060000 @#60000, (RO) ; SROM=3 DSTM=1 DOP DEST NON-MOD 
#0,a(ROS+ “SRCM=2 DSTM=3 DOP DEST MOD 
2235 026666 060002 060002 #60002 ,a#60002 :SRCM=3 DSTM=3 MOV DEST 
2236 026674 150672 MRO > TURN OFF MEMORY MAWACEMENT 
2037 : TEST ROT/SHFT AND ASH/ASHC INSTRUCTIONS 
2239 026700 012767 026720 152202 #5$,$LPERR ;SET LOOP ON ERROR POINTER TO 5$ 
012737 000001 060000 #1, a#60000 *SET CONSTANT FOR TEST 
005267 150652 MRO :TURN ON MEMORY MANAGEMENT 
20 006137 060000 : ROL @a4#60000 ‘DSTM=3 ROT/SHFT 
$525 026724 072337 060000 a4#60000,R3 :DSTM=3 ASH/ASHC 
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2244 026730 005067 150636 CLR MMRO TURN OFF MEMORY MANAGEMENT 
2245 ; TEST MUL/DIV AND SWAB INSTRUCT IONS 


2246 ; 
2247 026734 012767 026752 #6$ ,SLPERR ;SET LOOP ON ERROR POINTER TO 6$ 
012700 000001 MOV #1,RO :SET UP er FOR TEST 
150620 ee tt ey; Y MANAGEMENT 
060000 :DSTM= MUL/D1V 
060004 : STM=3 SWAB 
150604 MMRO TURN OFF MEMORY MANAGEMENT 
000001 ;DISABLE USER D-SPACE 
000006 SMAKE UIPDR3 RESIDENT 
026534 20$,$LPER SET LOOP ON ERROR POINTER TO START OF TEST 
5528 027010 005067 150762 PSW ;RESET TO KERNAL SPACE 


2266 5 EERE EEE AAA EEE AAA AAA AEE ERATE EAE ee 


S*TEST 20 TRAPPING IN D=SPACE KERNAL MODE 
Le 


THIS TEST ge THAT THE ABORT VECTOR IS TAKEN FROM 
D-SPACE AND NOT I-SPACE. THE I-SPACE VECTOR POINTS TO 
10$ AND THE D-SPACE VECTOR POINTS TO 15$. EACH PSW IN 
VIRTUAL 252 IS DIFFERENT SO THE PROGRAM CAN TELL WHICH 
AREA IT IS PICKED UP FROM. 


REAR RE EAE EEE ARKERKREREEEEKKKKEKKKKE 


027014 000004 
2267 027016 004767 153304 PC, TOFF ;TURN OF T-BIT FOR THIS TEST 
: #1$,$LPERR L RROR 
#10$, a#MMVEC 
aaMMve 


C+2 
1 138. a#350 


an352 
insted KSP 
MRO ‘TURN ON ME 
AN ABORT IN KERNAL MODE WITH D-SPACE ENABLED 


#77402, KDPDR4 ;KERNAL D-SPACE PAGE 4 IS READ ONLY 
600 ,KDPAR4 :MAP D-SPACE PAGE 4 TO 12k 


zMAP KERNAL D 
;TRY TO WRITE TO PAGE 4 
7SAVE PSW FOR COMPARE 
BRANCH TO D-SPACE READ CODE 
SAVE PSW FOR yey E 
GE 0 TO PHYSICAL 0 


[REMAP KERNAL D P 

SRESET STACK POINTER AFTER D-SPACE ASORT 

; TURN OFF KERNAL D-SPACE ENABLE 

> SAVE MMRO FOR COMPARE 

SAV —E MARI FOR COMPARE 

+ SAV VE MMAR2 FOR COMPARE 

:DID YOU PICK CORRECT PSwW 

;BRANCH IF PSW IS 340 
+33 ;WRONG PSW PICKED iN oo SEQUENCE 
#020031,R1 sEXPECT ING READ ONLY 

KERNAL MODE D-SPACE PAGE ", 
3$ ‘BRANCH IF CONDITION IS CORRECT 
+27 WR 
005067 : MMRO : 

2299 097514 012767 002466 AMGMERR , MMVEC ;RESTOR 





. 
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2300 027222 012767 000340 MOV #340 ,MMVEC +2 ;RESTORE TRAP PSW (PRIORITY=7) 
Sep) 027230 012767 027022 MOV #20$,$LPERR ;SET LOOP ON ERROR POINTER TO START OF TEST 
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TRAPPING IN D=SPACE KERNAL MODE 


S 


SESERE 


NononoMononofonoforonororory 
WNWWAW 
—_ et os 
WOAUSWHO 


WW 
N 


027236 
2329 027240 


2348 027346 
2349 
2350 
2351 
2352 027350 
2353 027352 
2354 
2355 
2356 
2357 027354 


2358 027354 
2359 027362 


37 NSN Ne aN e\ 0/0, oNet Nel eNeSe\o/e\ 
“SBTTL GROUP 7 MOVE 
BT NoF eNoS Nol eNole\ol ' oN eN\oJe\e7e\070\ 


RRA RERAAAEREEEEEEAEEEEEEEER AERA REREKREEREEEEREKERAEREEKEKEEHEEE 


THIS GROUP OF TESTS WILL TEST ALL THE LOGIC ASSOCIATED WITH 
THE ‘MOVE FROM PREVIOUS'' AND MOVE TO PREVIOUS’’ INSTRUCTIONS. 


SERRE EERE EERE EREREKREEARKKKEKKREKKEEE 


REAR EEE EEE KEEREKREKKKKKKE 


;*TEST 21 MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 
THIS TEST USES THE ‘MFPI INSTRUCTION TO ENSURE THAT THE 


EVIOUS MODE IS CLOCKED CORRECTL 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE (SUPERVISOR) IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 23$, WHERE THE ERRORS ARE REPORTED. 


REAR EEE EEE AEE ERA AREER 


$121: 
PC,APRINIT : INIT ALL PAR/PDR'S 
#1 ,MMRO 


WW +e eee eee 


—* te by tee eee be 4 


150320 
143070 . 
142762 7MAP_ SIPAR4 TO 12 

;LOAD DATA PATTERN INTO RO 

;LOAD DATA argh ge. INTO PHY 60000 

7SET M.M. VECTOR TO 23$ 
CLRB IPDR4 MAKE yey) [-SPACE PAGE 4 NON-RESIDENT 
;THE FOLLOWING WILL TEST DSTM=0 MFP 


#5$ SLPERR ;SET_LOOP ON ERROR POINTER TO 5$ 
#010340,PSwW MAKE PREVIOUS MODE SUPERVISOR 

SSP “PUT SUPERVISOR STACK POINTER ON KERNEL STACK 
#KERSTK ,KSP :WAS SOMETHING PUSHED ON STACK AT 6$ 


(KSP)+,RO 
A#SUPSTK ,R1 00 AS SSP 
RO,R1 D YOU GET THE RIGHT POINTER? 
8$ ‘BRANCH IF YOU DID 
+23 WRONG THING WAS PUSHED ON STACK 
SOEPLA TIGHTER SCOPE LOOP 
ERROR CALL WITH 
= 000763 


— 
wn 


8$ 
+25 


;REPLACE ERROR CALL WITH 
5$"' = 000761 


sTHE FOLLOWING WILL TEST athe! MFP]. 
MOV #9$, SLPERR :SET LOOP ON ERROR POINTER TO 9% 
MOV 936814, RO *RELOAD DATA PATTERN IN RO 


151526 








CKKTBBO 11/44 MEM MGMT PRT B 
T21 MOVE 


2378 027442 
2379 


1 
2382 027444 
2383 027444 
2 027452 


2389 027472 
2390 

2391 

2592 

Sear 027474 
239% 474 


2401 027524 
2402 
2403 
2404 
2405 027526 
2406 


2407 
2408 027526 


2416 027564 


027420 
010340 
100000 


027452 
010340 
100000 


027502 
010340 
00002 


150402 


151470 
150350 


MACRO M1113 8 -79 14:41 PAGE $5.3 1 
FROM PREVIOUS (SUPERVISOR) 


010340 
100000 


#010340 ,PSwW 
#100000 ,R2 


(R2) 
(KSP)+,R1 
RO,R1 

10$ 
+23 


;THE FOLLOWING WILL TEST” ‘psie MFPI 
Mov #11$,$LPERR 7 SET 


#010840, PSW 
#100000.R2 


;THE FOLLOWING WILL TEST DSTM=3 MFPI. 
MOV ;SET LOOP 


#13$,$LPERR 
#010340 ,PSW 
24100000 


(KSP)+,R1 
RO,R1 

14$ 

+23 


#010840, PSW 
#100002. 2 
-(R2) 
(KSP)+,R1 
RO,R1 
16$ 
+23 


#17$,$LPERR 
#010340, PSw 


#100000 , $TMP2 
#<$TMP2+2>,R2 
a-(R2) 


2 
(KSP)+,R1 
RO,R1 
18$ 
+23 


MAKE PREVIOUS MODE SUPERVISOR 
;LOAD ie aetica a INTO R2 


, ERROR CALL WITH 
= 000766 


OOP ON ERROR POINTER TO 11$ 
‘MAKE PREVIOUS MODE SUPERVISOR 
: LOAD VIRTUAL ADDRESS INTO R2 
;READ FROM PHYSICAL 60000 
;POP KERNEL STACK INTO R1 
[WAS DATA FETCHED SAME AS STORED 
;BRANCH IF yg Ba WAS FETCHED 


ooP 
;REPLACE ERROR CALL WITH 
;'BR 11$°* = 000766 


RROR POINTER TO 13$ 
UPERVISOR 


; Ic 
;POP KERNEL STACK INTO R1 
WAS DATA FETCHED SAME 
;BRANCH 


AS STORED 
IF CORRECT DATA WAS FETCHED 
;WRONG DATA WAS FETCHED 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 

= 000767 


;' BR 
;THE FOLLOWING WILL TEST _DSTM=4 MFPI. 
MOV #15$, $LPERR ; SET 


LOOP ON ERROR POINTER TO 15$ 
;MAKE PREVIOUS MODE SUPERVISOR 
;LOAD fd 2 gy INTO R2 

READ FROM PHYSICAL 

;POP KERNEL STACK INTO R1 

SWAS DATA FETCHED SAME AS STORED 

; BRANCH IF CORRECT af WAS FETCHED 


OoP 
REPLACE ERROR CALi WITH 
BR 15$°' = 000766 


7 THE FOLLOWING WILL TEST DSTM=5 MFPI. 


SET LOOP ON ERROR POINTER A 17$ 
MAKE PREVIOUS MODE SUPERVISOR 
;LOAD TEST LS. Ale ADDR om LOC. 


: LOAD ADDR. MP2+2 | 


= FROM PHYSICAL 

POP KERNEL STACK INTO R1 
“WAS DATA _FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 


SWRONG DATA WAS FETCHED 





H 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 5-3 
121 MOVE FROM PREVIOUS (SUPERVISOR) I-SPACE 


FOR TIGHTER SCOPE LOOP 
sREPLACE ERROR CALL WITH 
’ oe = 00076 


;THE FOLLOWING WILL TEST DSTM=6 MFPI. 


#19% ,SLPERR 
#010340,PSw 


Re 
100000 (R2) 
(KSP)+,R1 


;SET LOOP ON ERROR POINTER TO 19% 
MAKE PREVIOUS MODE SUPERVISOR 
3MAKE pais seas 2 A ZERO 

[READ FROM PHYSICAL 60000 
;POP KERNEL STACK INTO R} 


SWAS DATA FETCHED SAME AS STORED 
BRANCH IF 


RO,R1 
614 208 CORRECT DATA WAS FETCHED 

2429 027616 1 +23 [WRONG DATA FETCHED 

2430 :FOR TIGHTER st SCOPE LOOP 


2431 ;REPLACE ERROR CALL WITH 
= 000766 


sTHE FOLLOWING WILL TEST’ DSTM=? MFP I. 


#21$,$LPERR 
#010340,PSw 


00000; $TMP2 


#STMP2,R 
a@0(R2) 


(KSP)+,R1 
RO,R1 

22$ 

+23 


AMGME RR , MMVE C 
#1$,$LPERR 

#6 ,KIPDR4 
TST22 


(KSP) +, TRAPPC 


SET LOOP ON ERROR POINTER TO 21$ 

MAKE PREVIOUS MODE SUPERVISOR 

LOAD TEST LOC. V.A. INTO $TMP2 

LOAD ADDRESS OF $TMP2 INTO R2 

‘Use STMP2 TO PeTCH VIRTUAL 

ADDRESS OF 60000 

;POP KERNEL STACK INTO R1 

2 WAS ay FETCHED SAME AS STORED 
ne tee he DATA WAS FETCHED 

FETCHED 


OR TO NORMAL RUUTINE 
:SET LOOP POINTER TO START OF TEST 
:MAKE KIPDR4 RESIDENT 
7;BRANCH TO NEXT TEST 


SAVE PC & PS OF TRAP 


SAVE SRO FOR ERROR TYPEOUT 
TSAVE SR SR2 FOR ERROR TYPEOUT 
[CLEAR ERROR BITS IN SRO AND LEAVE 
: TRIED TO READ NON-RESIDENT PAGE 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 

* NOP"* 40 


iA 2 
;PuT PC & PS OF TRAP ON STACK 


32 
2459 027740 
2460 
2461 
2462 
2463 thoy) 
2464 0277 
2465 057789 
2466 


016746 


TRAPPS ,~(KSP) 
016746 
000002 


TRAPPC ,~(KSP) 















5 
18 MACRO oh ha O5=DEC=79 14:41 PAGE 6 
vious (USER) I-SPACE 
















2479 RRA RAAEHEEHHKERAEEEARAERARAREREEREAEKREREARAEKRAAARAAEEE 
tSTEST 22 MOVE FROM PREVIOUS (USER) I-SPACE 
** 
* THIS TEST USES THE "MFPI° INSTRUCT ION TO ENSURE THAT THE 
:* PREVIOUS MODE IS CLOCKED CORRECTL 
:* THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 
-* 
-* 
* IF THE CORRECT MODE (USER) IS NOT ENABLED A NON-RESIDENT ABORT 
;* WILL OCCUR AND TRAP TO 23$, WHERE THE ERRORS ARE REPORTED. 
:* 
«SAA e Rake ReeReRHA REE ETe Cee eee eeeeeAeeeeeeeeeeeeneneeeeeeeees 
027754 000004 1$122: SCOPE 
2480 027756 012700 036514 1$: MOV #36514,RO ;LOAD DATA PATTERN INTO RO 
2481 027762 012767 000600 147660 MOV #600 ,UIPAR4 [MAP UIPAR4 TO 12k 
2482 027770 010037 100000 MOV RO, #100000 [LOAD DATA PATTERN INTO PHY 60000 
2483 027774 012767 030404 150246 MOV #e5s MMvEC :SET M.M. VECTOR TO 23$ 
2484 0 105067 142302 CLRB _—sCKIPD MAKE Kk ERNEL 1 oSPACE PAGE 4 NON-RESIDENT 
ce THE FoLtouine WILL TEST SIMO MF PI 
2487 030006 012767 030014 151074 ov #5$,SLPERR :SET LOOP ON ERROR POINTER TO 5$ 
2488 030014 012767 030340 147754 S$: MOV #030340,PSw [MAKE PREVIOUS MODE USER 
2489 030022 006506 6$: MFP] ‘PUT USER STACK POINTER ON KERNEL STACK 


USP 
2490 030024 MKERSTK ,KSP zWAS SOMETHING PUSHED ON STACK AT 6$ 





Ox taR0 
T22 


11/44 MEM MGMT PRT B 
MOVE 


FROM PREVIOUS (USER) I=SPACE 


030030 001407 
Beer 012600 
2701 000600 


oOo 
=D 


MACRO M1113 O5=DEC-79 14:41 PAGE 37° 


7$ 
(KSP)+,RO 
sr hited 


+23 


RNEL STACK INT ry RO 
NG 


IF YOU DID 

THING WAS PUSHED ON STACK 
?FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 


SEQ 0061 





K 5 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE 28 
T22 MOVE FROM PREVIOUS (USER) I-SPACE 


;"BR 5$"' = o00762 
BR 8$ BRANCH TO NEXT TRY 
ERROR +25 THING PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR CALL WITH 
5$°* = 000761 


: ;THE FOLLOWING WILL TEST ‘DS TM=1 MFPI. 
151030 Mov #9$_$LPERR SET LOOP ON ERROR POINTER TO 9$ 
MOV ;RELOAD DATA PATTERN IN RO 
147704 : MAKE PREVIOUS MODE USER 
00000 ,R2 ;LOAD i, ADDRESS INTO R2 
;READ FROM PHYSICAL 60000 
;POP KERNEL STACK INTO R1 
3WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
AEP TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
9$"* = 000766 


sTHE FOLLOWING WILL TEST AM. MFPI. 
150772 MOV #11$, $LPERR 7SET LOOP ON ERROR POINTER TO 11$ 
147652 : MOV #030820, PSW SMAKE PREVIOUS MODE USER 

MOV #100000.R2 [LOAD VIRTUAL ADDRESS INTO R2 


mr 
S8 


ROR ARR RFR RN 
Nl San ~ed cn d-usnese> 
WWNAWUSWN—O 


mnrnr 
Vw 
wh 
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T22 MOVE FROM PREVIOUS (USER) I-SPAC 


2525 030130 006522 (R2)+ ;READ FROM PHYSICAL 60000 
2526 030 (KSP)+,R1 KERNEL STACK INTO R1 
RO,R1 AS DATA FETCHED SAME AS STORED 
12$ SBRANCH IF CORRECT DATA WAS FETCHED 
+23 + WRONG ETCHED 
[FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
2532 11$"' = 000766 
2533 030142 12$: THE FOLLOWING WILL TEST DSTM=3 MFPI. 
253% 030142 030150 150740 Mov #13$, $SLPERR :SET LOOP ON ERROR POINTER TO 13$ 
2535 030150 030340 147620 13$: MOV *030%20, PSW [MAKE PREVIOUS MODE USER 





m 5 
CKKTBBO 11/44 MEM MGMT PRT B MACRO oh O5=DEC-79 14:41 PAGE 30 
T22 MOVE FROM PREVIOUS (USER) I-SPAC 


006937 100000 24100000 ;READ FROM PHYSICAL 60000 
12601 (KSP)+,R1 ;POP KERNEL STACK INTO R1 
020001 RO,R1 3WAS DATA FETCHED 


SAME AS STORED 
001401 BEQ 14$ SBRANCH IF CORRECT DATA WAS FETCHED 
104023 +23 SWRONG DATA WAS FETCHED 
[FOR TIGHTER SCOPE LOOP 
; REPLACE ERROR CALL WITH 
13$'' = 000767 


2544 
2545 030172 : ;THE FOLLOWING WILL TEST’ ‘DS TM=é MFPI. 





N 
CKKTBBO 11/44 MEM MGMT PRT B MACRO sh i O5S=DEC-79 14:41 PAGE 31 
T22 MOVE FROM PREVIOUS (USER) I-SPAC 


012767 030 150710 #15$,$LPERR ;SET LOOP ON ERROR POINTER TO 15$ 
030340 147570 15$: #030340,PSw “MAKE PREVIOUS MODE USER 
100002 #100002.R2 LOAD VIRTUAL ADDRESS INTO R2 
=(R2) READ FROM PHYSICAL 60000 
(KSP)+,R1 [POP KERNEL STACK INTO R 
RO,R1 SWAS DATA FETCHED SAME As STORED 
16$ ;BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
*FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
‘BR 15$'' = 000766 


RRNA AN 


4 


¥ 
& 
Oo 
S 
‘~ 


§ :THE FOLLOWING WILL TEST DSTM=5 MFPI. 
2561 030224 MOV #17$,$LPERR :SET LOOP ON ERROR POINTER TO 17% 
562 030232 


2 : MOV #020340,PSWw ‘MAKE PREVIOUS MODE USER 





B 6 
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T22 MOVE FROM PREVIOUS (USER) i-SPACE 


2564 030240 012767 100000 150734 MOV #100000,$TMP2 ;LOAD TEST LOC. VIRT. ADDR INTO LOC. STMP2 





6 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 O5=DEC-79 14:41 PAGE $5 
T22 MOVE FROM PREVIOUS (USER) I-SPACE 


2566 030246 Brees 001204 M<STMP2+2>,R2 ;LOAD ADDR. OF $TMP2+2 INTO R2 
2567 030252 006552 a-(R2) ZREAD FROM PHYSICAL 60000 
2568 030254 012601 MOV (KSP)+,R1 ;POP KERNEL STACK INTO R1 





CKKTBBO 11/44 MEM MGMT PRT B 
T22 MOVE 


FROM PREVIOUS (USER) 


2570 030256 
2571 030260 
2572 030262 
2573 

2574 

2575 

2576 030264 
2577 

2578 030264 
2579 030272 
2580 030300 
2581 030302 
2582 030306 
2583 030310 
2584 030312 
2585 030314 
2586 

2587 

2588 

2589 030316 
2590 

2591 030316 
2592 030324 

2593 030332 
2594 030340 
2595 030344 
2596 

2597 030350 


2598 030352 
2599 030354 
030356 


BSS ASSES 
WONAWUSWNH Oo 


Rosesouesece 
ooo 
3 


NM 
oO 
NM 
_ 


020001 
001401 
104023 


012767 
012767 
005002 


006 

012601 
020001 
001401 
104023 


012767 


6746 
6746 
000002 


oo 
par Pwr 


030272 
030340 


100000 


6 
MACRO M1113 O5=DEC-79 14:41 PAGE 8. 


150564 
147444 
150642 


I-SPACE 


18$: 


19$: 


20$: 


21$: 


22$: 


23$: 


CMP RO,R1 :WAS DATA FETCHED SAME AS STORED 
BEQ 18$ SBRANCH IF CORRECT DATA WAS FETCHED 
ERROR +23 DATA WAS FETCHED 


THE FOLLOWING WILL TEST’ DSTM=6 MFPI. 
Mov #19%,$SLPERR 


:SET LOOP ON ERROR POINTER TO 19S 
MOV #030340,PSW :MAKE PREVIOUS MODE USER 
CLR R2 {MAKE REGISTER 2 A ZERO 
MFP]  100000(R2) [READ FROM PHYSICAL 
MOV (KSP)+,R1 [POP KERNEL STACK INTO R1 
CMP RO,R1 TWAS DATA FETCHED SAME AS STORED 
BEQ 20$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
ERROR +23 ‘WRONG DATA WAS FETCHED 


;REPLACE ERROR CALL WITH 
= 000766 
;THE FOLLOWING WILL TEST * DSTM=? MFPI. 
MOV #21$,$LPERR ;SET LOOP ON ERROR POINTER TO 21$ 


MOV #030340,PSW TMAKE PREVIOUS MODE USER 

MOV #100000,$TMP2 LOAD TEST LOC. V.A. INTO $TMP2 

MOV #STMP2,R2 [LOAD ADDRESS OF $TMP2 INTO R2 

MFPI  a0(R2) SUSE $TMP2 TO FETCH VIRTUAL 
SADDRESS OF 60000 

MOV (KSP)+,R1 [POP KERNEL STACK INTO R1 

CMP RO,R1 ‘WAS DATA FETCHED SAME AS STORED 

BcQ 22$ SBRANCH IF CORRECT DATA WAS FETCHED 

ERROR +23 ‘WRONG DATA WAS FETCHED 


FOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR CALL WITH 

21$'' = 000762 
7SET M.M. VECTOR TO NORMAL ROUTINE 
ZSET LOOP POINTER TO START OF TEST 
:MAKE KIPDR4 RESIDENT 
7 ;BRANCH TO NEXT TEST 


MOV A ie ow -MMVEC 


MOV (KSP) +, TRAPPC 
MOV (KSP) +, TRAPPS 
oA os Sree 
BIC #160000, SRO 
ERROR Oe 


SAVE PC & PS OF TRAP 


SAVE SRO FOR ERROR ha a 
7SAVE SR2 FOR ERROR TYPEOU 
[CLEAR ERROR BITS IN SRO AND LEAVE 
; TRIED TO READ NON-RESIDENT PAGE 
[FOR TIGHTER SCOPE LOOP 
:REPLACE ERROR CALL WITH 

*NOP"* = 000240 
MOV TRAPPS ,~(KSP) :PUT PC & PS OF TRAP ON STACK 
MOV TRAPPC ,~(KSP) 


SEQ 0068 


— 11/44 MEM MGMT PRT B MACRO M1113 OS=DEC-79 14:41 PAGE 5s ° 


FROM PREVIOUS (USER) I-SPACE SEQ 0069 
2623 
26246 
26% TOR RRAAAAAAALERAAASAELAAASZAEAALALL ELEC ERE EER TERR RRR RRR RRA 
: tSTEST 23 MOVE TO PREVIOUS(SUPERVISOR) I-SPACE 
*“* 
ie THIS TEST USES THE 'MTPI INSTRUCT ION TO ENSURE THAT THE 
* PREVIOUS MODE IS CLOCKED CORRECTLY 
* THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 
** 
*“* 
;* IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
te WILL OCCUR AND TRAP TO 20$, WHERE THE ERRORS ARE REPORTED. 
** 
jj tseeneeneencnnaenaccencenaceensananenassensenenanenenaaeenseees 
030452 000004 1123: SCOPE 
2637 030454 012767 077406 141526 1$: mov #77406,SIPDR4  ; SUPERVISOR 1-SPACE PAGE 4 READ/WRITE 
2638 030462 012767 031242 147560 #20$, MMVEC [SET M.M. VECTOR TO 20$ 
2639 THE FOLLOWING WILL TEST DSTM=0 MTPI 
2641 030470 012767 010340 147300 28: ov #010340, PSW :MAKE PREVIOUS MODE SUPERVISOR 
2642 030476 012746 007777 MOV #7777,-(KSP) | PUSH DATA ON KERNEL STACK 
2643 030502 006606 MIP] SSP SLOAD SUPERVISOR STACK POINTER 
2644 030504 006506 MFP] SSP [READ SUPERVISOR STACK POINTER 
2645 030506 012601 MOV (KSP)+,R1 ‘POP KERNEL STACK INTO R1 
2646 030510 022701 007777 CMP #7777,R) ‘WAS SUPERVISOR STACK POINTER CHANGED 
2647 030514 001401 BEQ 3$ TBRANCH IF IT WAS 
2648 030516 104025 ERROR +25 SSUPERVISOR STACK POINTER NOT CHANGED 
2649 “FOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
o” 2$"' ca 000764 
030 012767 010340 147250 3$: MOV #010340,PSw [MAKE PREVIOUS MODE SUPERVISOR 
2653 030526 012746 000700 MOV WSUPSTK,~(KSP) GET READY TO RESTORE SUPERVISOR S. POINT 
030 MIP] SSP “RESTORE SUPERVISOR STACK POINTER 
2655 030534 4$: :THIS WILL TEST DSTM = 1 MTPI. 
2656 030534 012767 030552 150346 MOV #58 $LPERR :SET LOOP ON ERROR POINTER TO 5$ 
2657 030542 012702 100000 MOV R2 “LOAD VIRTUAL ADDRESS INTO R2 
58 030546 012700 125252 MOV m25e59. :RO “LOAD TEST DATA INTO RO 
2659 030552 010046 S$: MOV RO. =(KSP [PUSH TEST DATA ON KERNEL STACK 
2660 030554 105067 141530 CLRB PDRG {MAKE KERNEL I PAGE 4 NON-RESIDENT 
2661 030560 006612 MTP] (Ro) ‘LOAD TEST DATA INTO PHYSICAL 60000 
2662 030562 112767 000006 141520 MOVB #006,KIPDR4 “MAKE KERNEL PAGE 4 RESIDENT 
2663 030570 011201 MOV (R2).R1 ‘READ FROM ADDRESS 60000 
2664 030572 020001 CMP RO,Ri *SEE IF DATA WAS STORED AT CORRECT PLACE 
2665 030574 001401 BEQ 6$ SBRANCH IF STORE WAS CORRECT 
2666 030576 104024 ERROR +24 : INCORRECT STORE 
‘FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
2669 $"* = 000765 
2670 030600 6$: ;THE FOLLOWING WILL TEST’ DSTM=2 MIPI. 
2672 030600 012767 030624 150302 MOV #8$,$LPERR :SET LOOP ON ERROR POINTER TO 8$ 
030606 012767 010340 147162 MOV #010340,PSw [MAKE PREVIOUS MODE SUPERVISOR 
2674 030614 012700 125252 MOV #125252.R0 ;LOAD TEST DATA INTO RO 
2675 030620 012702 100000 MOV #100000,R2 “LOAD VIRTUAL ADDRESS INTO R2 
2676 030624 010046 8$: MOV RO, -(KSP) “BUSH TEST DATA ON KERNEL STACK 
2677 030626 105067 141456 CLRB  —- KIPDR4 MAKE KERNEL PAGE 4 NON-RESIDENT 
2678 030632 006612 MTP] (R2) ‘LOAD TEST DATA INTO PHYSICAL 60000 


F 6 
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123 MOVE TO PREVIOUS(SUPERVISOR) I-SPAC 


112767 000006 141446 KIPDRG sMAKE KERNEL PAGE 4 RESISENT 
013701 100000 34106000, R1 [READ FROM ADDRESS 60000 
020001 [SEE IF DATA WAS STORED CORRECTLY 
001401 BEQ os" [BRANCH IF STORE WAS CORRECT 
104024 +24 S INCORRECT STORE 

[FOR TIGHTER SCOPE LOOP 

ZREPLACE ERROR CALL WITH 

:'BR 8$'' = 000764 


; ;THIS WILL_TEST DSTM = 3 MTPI. 
012767 MOV #10$, SLPERR SET LOOP ON ERROR POINTER TO 10$ 
0 #0 SW MAKE PREVIOUS MODE SUPERVISOR 
052505 2 ;LOAD TEST DATA INTO RO 
: P P ;PUSH TEST DATA A ~— STACK 
141406 CLRB IPDR4 MAKE KERNEL I PAGE 4 NON-RESIDENT 
100000 24100000 “LOAD TEST DATA INTO PHYSICAL 60000 
000006 SMAKE KERNEL PAGE 4 RESIDENT 
100000 1 ;READ FROM ADDRESS 60000 
RO,R1 SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORE WAS CORRECT 
; INCORRECT STORE 
;FOR TIGHTER SCOPE LOOP 
;REPLACE ERR oe L WITH 
2701 ;*BR 10$*' 
2702 030726 : ;THIS WILL_TEST DSTM = 4 MTPI. 
2703 030726 150154 MOV #12$,$LPERR 2 LOOP ae ERROR POINTER TO 12% 
2704 030734 147034 #0 VISOR 
2705 030742 125252 


100002 
141330 PAGE 
) ;LOAD TEST DATA INTO apps tes 60000 
000006 141320 SMAKE KERNEL PAGE 4 RESIDENT 
100000 a) R1 ;READ FROM ADDRESS 60000 
SEE IF DATA WAS STORED aa 


2714 031000 

2715 

2716 

2717 

tas | 031002 : : THE FOLLOWING WILL TEST " DSTM=S MTPI. 


031034 150100 :SET LOOP ON ERROR POINTER TO 14$ 
010340 146760 #010340 ;MAKE PREVIOUS MODE SUPERVISOR 
052525 2525 ,RO : LOAD TEST DATA INTO RO 
001204 ;LOAD ADDR. OF LOC. STMP2+2 INTO R2 
150146 100000,$TMP2 LOAD VIRT. ADDR. OF TEST Coc. INTO $TMP2 
: P [PUSH TEST = ON KERNEL STACK 
141246 ;MAKE KERNEL PAGE 4 NON-RESIDENT 
;LOAD TEST DATA we ptt beg 60000 
000006 141236 MOVB ;MAKE KERNEL PAGE 4 RESIDENT 
100000 :READ FROM ADDRESS 
7 SEE IF DATA_WAS STORED CORRECTLY 
CH CORRECT 


NAW 
SAE 
NON 


=s 

8 
oO 
=} 


SCOPE LOOP 
:REPLACE ERROR CALL WITH 
;'BR 14$°° = 000764 





CKKTBBO 11/44 MEM MGMT PRT B MACRO aie O5=DEC-79 14:41 PAGE $58 
123 MOVE TO PREVIOUS(SUPERVISOR) I-SPAC 


$738 031064 15$: THIS WILL TEST DSTM = 6 MIPI. 


#16$,$LPERR ;SET LOOP ON ERROR POINTER TO 16$ 
#010340 psu : SUPERVISOR 


gece 
33 


ZERO 

A_ON KERNEL STACK 
sMAKE KERNEL I PAGE 4 NON-RESIDENT 
LOAD TEST DATA ry PHYSICAL 60000 
;MAKE KERNEL PAGE 4 RESIDENT 


;READ FROM ADDRESS 60000 
SEE 4 DATA_WAS STORED — 
H_IF STOR CORRECT 


o-—— os 
SINSS 


oo-o-0 


SRORBESRESIE 


2752 : = 
ie}, 031140 : ;THE FOLLOWING WILL TEST DSTM=7 MTPI. 


2755 031140 2 167742 #18$, SLPERR :SET LOOP ON ERROR POINTER TO 18$ 
56 0311 67 0 146622 #010340,PSw [MAKE PREVIOUS MODE SUPERVISOR 
#129252, RO [LOAD TEST DATA INTO RO 
150014 #100000.$TMP2 LOAD VIRT. ADDR. OF TEST LOCATION 
‘INTO LOCATION $TMP2 
#STMP2 ,R2 [LOAD ADDRESS OF $TMP2 INTO R2 
[PUSH TEST DATA ON KERNEL STACK 
[MAKE KERNEL PAGE 4 NON-RESIDENT 
‘LOAD TEST DATA INTO OHYSICAL #40000 
141076 “MAKE KERNEL PAGE 4 RESIDENT 
1 R1 [READ FROM ADDRESS 60000 
;SEE IF DATA WAS STORED CORRECTLY 
CORRECT 


sree 031222 
$70 


277 : = 7 

5772 031224 147656 2 #1$,$LPERR :SET LOOP POINTER TO START OF TEST 
2773 031232 147010 AMGMERR ,MMVEC ;RESTORE M.M. VECTOR TO NORMAL ROUTINE 
he 031240 He TST24 7; BRANCH TO NEXT TEST 


2776 
2777 031242 : (KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
(KSP) +. TRAPPS 
SRO,WASSRO :SAVE SRO FOR ERROR TYPEOUT 
SR2.WASSR2 [SAVE SR2 FOR ERROR TYPEOUT 
#160000, SRO *CLEAR ERROR BITS IN SRO 
+24 ‘TRIED TO LOAD A N.R. PAGE 4 
‘FOR TIGHTER SCOPE LOOP 
:REF PLACE, ERROR CALL WITH 


000240 
016746 60 MOV TRAPPS , =(KSP) ‘pur PC a PS OF TRAP ON STACK 
016746 TRAPPC ,~(KSP) 
000002 ;RETURN TO TEST 
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2790 SRR EEE A ARETE TERA AAAAREAEAEAERE RARER 


STEST 24 MOVE TO PREVIOUS (USER) I-SPACE 


THIS TEST ae’ THE ‘MTPI* vo ky s)he TO ENSURE THAT THE 
PREVIOUS E IS CLOCKED CORRECTLY 
THERE IS A A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 20$, WHERE THE ERRORS ARE REPORTED. 


PETTITT TTT iti i titi ii ii ii ii tii iii iii iii: 
031310 000004 rats SCOPE 

2791 031312 146270 MOV #77406,UIPDR4  ;USER oor A ae 4 READ/WRITE 

2792 031320 000600 146322 MOV #600 ,UIPARS MAP USER I PAGE 4 TO 12K 

2793 031326 012767 146714 MOV #20$, MVE C 7SET M.M. VECTOR TO 20$ 

2794 : THE FOLLOWING WILL TEST DSTM=0 MTPI 


012767 0 0 146434 : #030340 ,PSW MAKE PREVIOUS MODE USER 
#7777 ,~(KSP) PUSH DATA ON KERNEL STACK 
USP ;LOAD USER STACK POINTER 
USP ~ USER STACK POINTER 
(KSP)+,R1 POP KERNEL STACK INTO R1 
#7777 ,R) “WAS USER STACK POINTER CHANGED 
3$ BRANCH IF IT WAS 
+25 USER STACK POINTER NOT CHANGED 
FOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
3° 2$"* = 000764 


012767 146404 : #030340 ,PSW MAKE PREVIOUS MODE USER 
012746 000600 MO MUSE STK ,~(KSP) 3GET READY TO RESTORE USER S. POINT 
006606 MTPj USP RESTORE USER STACK POINTER 
: THIS WILL_TEST DSTM = 1 “MT Pl. 
012767 147502 MOV a SLPERR ;SET LOOP ON ERROR POINTER TO 5$ 
R2 ;LOAD VIRTUAL ADDRESS INTO R2 
m125252. ;RO :LOAD TEST DATA INTO RO 
RO,~(KSP ;PUSH TEST DATA / KERNEL STACK 
KIPDR4 3MAKE KERNEL I PAGE 4 NON-RESIDENT 
(R2) ;LOAD TEST DATA INTO PHYSICAL 60000 
#006 ,KIPDR4 ;MAKE KERNEL PAGE 4 RESIDENT 
(R2) ,R1 READ FROM ADDRESS 60000 
RO,RI1 7SEE IF DATA WAS STORED AT CORRECT PLACE 
6$ BRANCH IF STORE WAS CORRECT 
+24 Fg py 3 STORE 
;FOR TIGHTER SCOPE LOOP 
;REPLACE, ERROR CALL WITH 
= 000765 


;THE FOLLOWING WILL TEST’ " DSTM=2 MIPI. 


2827 031444 #8$ SLPERR :SET LOOP ON ERROR POINTER TO 8$ 
2828 031452 #030340,P “MAKE PREVIOUS MODE USER 

031460 012700 #125252. RO” ;LOAD TEST DATA INTO RO 
2830 031464 #100000, R2 “LOAD VIRTUAL ADDRESS INTO R2 
2831 031470 : RO, -(KSP) *PUSH TEST DATA ON KERNEL STACK 
2832 031472 CLRB «KI PDR4 ;MAKE KERNEL PAGE 4 NON-RESIDENT 
2833 031476 (R2) “LOAD TEST DATA INTO PHYSICAL 60000 
2824 031500 #006 ,.KIPDR4 ‘MAKE KERNEL PAGE 4 RESISENT 


OO eee ee ee 


et me + Be Be He Be Be Be Be Be Be 


rip 
~~ = 
Nm 
Ww 
Ssss 


nsw 
RERRSAVE 


RE 
NO 
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2835 031506 013701 100000 @#100000,R1 ;READ FROM ADDRESS 60000 
2836 031512 020001 RO,R1 SEE IF DATA WAS STORED CORRECTLY 
9%) ‘BRANCH IF STORE WAS CORRECT 
+ 
: REPLACE ERROR CALL WITH 
= 000764 


98: :THIS WILL TEST DSTM = 3°MT Fag 
031540 147362 Mov #10$, $LPERR ;SET LOOP ON ERROR POINTER TO 108 
030340 146242 #030340,PSw MAKE PREVIOUS MODE USER 
052525 2 *LOAD TEST DATA INTO YRO 
846 031540 01004 ' 108: [PUSH TEST DATA ON KERNEL STACK 
2847 031542 140542 CLRB IPDR4 [MAKE KERNEL I PAGE 4 NON-RESIDENT 
2848 031546 006637 100000 @#100000 ‘LOAD TEST DATA INTO PHYSICAL 60000 
2849 031552 000006 “MAKE KERNEL PAGE 4 RESIDENT 
2850 031560 100000 1 [READ FROM ADDRESS 60000 
031564 020001 RO,R1 ;SEE IF DATA WAS STORED CORRECTLY 
2852 031566 F CORRE CT 
2853 031570 
2854 
2855 REPLACE ERROR C 
2856 :'BR 10$'' = 00076 
2857 031572 :  : THIS WILL TEST DSTM = 4°MTPI. 
2858 031572 767 031612 147310 MOV #12$, $LPERR ;SET LOOP ON ERROR POINTER TO 12% 
2859 031600 030340 146170 #030340,PSW [MAKE PREVIOUS MODE USER 
2860 031606 125252 #125252,RO “LOAD TEST DATA INTO RO 
2861 031612 010046 : Pp “PUSH TEST DATA ON KERNEL STACK 
100002 2,R2 : VIRTUAL ADDRESS INTO R2 
140464 “MAKE KERNEL I PAGE 4 NON-RESIDENT 
) [LOAD TEST DATA INTO PHYSICAL 60000 
000006 140454 : KERNEL PAGE 4 RESIDENT 
100000 [READ FROM ADDRESS 60000 
1 SEE IF DATA WAS STORED CORRECTLY 
ORE WAS CORRECT 


2872 : - 
2873 031646 : THE FOLLOWING WILL TEST’DSTM=5 MIPI. 


2875 031646 147234 #i4s SLPERR :SET LOOP ON ERROR POINTER TO 14$ 
030 1466114 30340, PSw zMAKE PREVIOUS MODE USER 
rs OAD TEST DATA INTO RO 
: ‘TOAD ADDR. OF LOC. $TMP2+2 INTO R2 
147302 100000,$TMP2  :LOAD VIRT. ADDR. OF TEST foc: “INTO STMP2 
: :PUSH TEST DATA ON KERNEL § 
*MAKE KERNEL PAGE 4 SONCRES IDENT 
*LOAD TEST DATA INTO PHYSICAL 60000 
140372 ;MAKE KERNEL PAGE 4 RESIDENT 


;READ FROM ADDRESS 60000 
3 SEE IF DATA _WAS he CORRECTLY 
C T S CORRECT 
2887 031726 
2888 SCOPE LOOP 
2889 ; REPLACE ERROR CALL WITH 
2890 14$°* = 000764 
2891 031730 ' THIS WILL TEST DSTM = 6" MIPI. 
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2892 : 

2893 031730 :SET LOOP ON ERROR POINTER TO 16$ 

2894 031736 :MAKE PREVIOUS MODE USER 

2895 031744 ;LOAD TEST DATA_INTO RO 

2896 031750 [MAKE ete ER 2 ZERO 

2897 031752 01 $ :PUSH TEST ee ON - STACK 

2 031754 MAKE KERNEL I PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO app elie 60000 

140316 MOVB : ;MAKE KERNEL a By RESIDENT 


;READ FROM SS_60000 
ZSEE IF DATA WAS STORED ores 
BRANCH IF re WAS CORRECT 


morn 


+ THE FOLLOWING WILL TEST’ ‘ DSTM=7 MIPI. 


147076 #18$,$LPERR ;SET LOOP ON ERROR POINTER TO 18$ 
145756 #030340, PSwW [MAKE PREVIOUS MODE USER 
#135389" RO “LOAD TEST DATA INTO RO 
147150 #100000.$TMP2 LOAD VIRT. ADDR. OF TEST LOCATION 
: LOCATION $TMP2 
ADDRESS OF $TMP2 INTO R2 
SH TEST DATA ON KERNEL STACK 
KERNEL PAGE 4 NON-RESIDENT 
; TEST DATA INTO PHYSICAL 60000 
140232 VB “MAKE KERNEL PAGE 4 RESIDENT 
1 R1 “READ FROM ADDRESS 


:RE 
SEE IF DATA _WAS STORED CORRECTLY 
CORRECT 


147012 : #1$,$LPERR 7SET LOOP POINTER TO START OF ys 
146144 WMGMERR .MMVEC  :RESTORE M.M. VECTOR TO NORMAL ROUTINE 
BR TST25 7 ;BRANCH TO NEXT TEST 


(KSP)+,TRAPPC  ;SAVE PC & PS OF TRAP 
(KSP) +, TRAPPS 
SRO .WASSRO ;SAVE SRO FOR ERROR TYPEQUT 
IC #160000, SRO 
2937 032140 +26 
2938 


2939 : REPLACE ERROR CALL WITH 
2940 *NoP’’ = 000240 
2941 032142 016746 TRAPPS ,~(KSP) ‘Pur PC & PS OF TRAP ON STACK 


2942 032146 016746 TRAPPC ,=(KSP) 
eer 032152 000002 ;RETURN TO TEST 
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2957 J [UAE A AEA AERA EAE TEETER ERE AAA AEREAEAREEREREREEAEEEREERERE ERS 


;*TEST 25 MFPI (KERNAL) TO SUPERVISOR MODE 


THIS TEST CHECKS age A THE PREVIOUS MODE IS KERNEL THE 
FETCH IS FROM KERNEL S 
THERE IS A DESCRIPTION. BEF ORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21$, WHERE THE ERRORS ARE REPORTED. 


Ba Be Be Be Be Be Be Be Se 
aenseeeneeeee 


OG Ee ea 
S725: COPE 
032164 #1$,$LPERR ;SET LOOP ON ERROR TO 1$ 
040340 1$: #040340,PSwW :60 TO SUPERVISOR moe FOR THIS TEST 
036514 RO “LOAD DATA PATTERN INTO RO 
100000 i LOAD DATA PATTERN INTO PHY 
100000 MOV #160000 ,R2 VIRTUAL ADDRESS INTO R2 
;THE FOLLOWING WILL TEST ‘bSTMet MFP 


032616 #21$ ,MAVEC ;SET M.M. VECTOR TO 21$ 
137770 SIPDR4 SMAKE SUPERVISOR I-SPACE PAGE 4 NON-RESIDENT 
040340 #040340 ,PSW SMAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
: KSP PUT KERNEL STACK POINTER ON SUPERVISOR STACK 
000700 MSUPSTK , SSP ZWAS SOMETHING PUSHED ON STACK AT 1$ 
5$ BRANCH IF NOTHING WAS PUSHED 
(SSP)+,RO ;POP_ SUPERVISOR STACK INTO RO 
001100 #KERSTK,R1 ; EXPECT ING 1100 AS KSP 
RO,R1 DID YOU GET THE ARIGHT POINTER? 
6$ “BRANCH IF YOU DID 
+23 ;WRONG THING WAS PUSHED ON STACK 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
4$"' = 766 


6$ 
+25 


+ REPLACE, ERROR CALL WITH 
= 000764 


ge FOLLOWING WILL TEST’ DSTM=1 MFPI. 
#7$,SLPERR :SET LOOP ON ERROR POINTER TO 7$ 
#040340,8 PSW “MAKE E KERNEL PRESENT SUPERVISOR 


#100000 .R2 


:R YSICAL 60000 
(SSP) +,R1 :POP SUPERVISOR STACK INTO R1 
RO,R1 ZWAS DATA FETCHED SAME AS STORED 
8$ 7BRANCH IF CORRECT DATA WAS FETCHED 
+23 WRONG DATA WAS FETCHED 

:FOR T TIGHTER SCOPE LOOP 

PLACE, ERROR CALL WITH 
= 000764 


: ;THE FOLLOWING WILL TEST™ ‘Demco MEPL. 
146566 Mov #9$ ree R SET LOOP ON ERROR POINTER TO 9$ 
145446 ; MOV sMAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
Vv R2 st LOAD VIRTUAL ADDRESS INTO R2 
MFP I (R2)+ ;READ FROM PHYSICAL 60000 








oO 
x 
x 
g 
2- 
vu™~ 


Loe 9° 


o000 
RRGAOAS 


eeesees 


lololelolelelajq) 
reiciereneneieh 
SoS a S 


Seeeeeeeey 
PN 


WONOUSWI—O 


3055 032520 
5056 
3057 
3058 


012601 
020001 
001401 
104023 


012767 
01 fee 
006537 
012601 
020001 


001401 
104023 


012767 
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032476 
040340 


100000 
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(SSP)+,R1 
RO,R1 


1 
+23 


;THE FOLLOWING WILL TEST ‘DSIMes MFP. 
MOV #11$,$LPERR ET LOOP 


#040340 ,PSw 
100000 


aw 
(SSP)+,R1 
RO,R1 

12$ 

+23 


#100002 2. 
(SSP)+,R1 
RO,R1 

14§ 

+23 


#17$,$LPERR 
#040340,PSw 


R2 
100000 (R2) 


(SSP)+,R1 
RO,R1 

18$ 

+23 


;POP SUPERVISOR STACK INTO R1 
3WAS DATA FETCHED SAME AS STORED 
BRANCH IF Rove 3 DATA WAS FETCHED 
;WRONG DATA WAS FETCHED 
REP TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
9$"* = 000766 


; ON ERROR POINTER TO 11$ 
MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
;READ FROM PHYSICAL 60000 
POP SUPERVISOR STACK we R1 
WAS DATA FETCHED SAME AS STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
;REPLACE ERROR CALL WITH 
11$°* = 000767 


:*BR 
Aly FOLLOWING WILL TEST DSTM=4 MFPI. 
#13$,$LPERR : SET 
#040340 Psu 


LOOP ON ERROR POINTER TO 13$ 
MODE it ane: SUPERVISOR 


3R AL 60000 
;POP SUPERVISOR STACK INTO R1 
[WAS DATA FETCHED SAME AS STORED 
;BRANCH IF yoo! DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
ZFOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
= 000766 


+ THE FOLLOWING WILL TEST ‘psims MFPI. 


#15$,$LPERR 
#040340 ,PSw 
00000; $TMP2 


;SET LOOP ON ERROR POINTER TO 15$ 
;MAKE PREVIOUS MODE KERNEL PRESENT SUPERVISOR 
;LOAD TEST LOC. VIRT. ADDR INTO LOC. SIMP2 
;LOAD pase oe 8 Bigs iF INTO R2 
;READ FROM PH AL 60000 
;POP SUPERVISOR. STACK INTO R1 
WAS DATA FETCHED SAME AS STORED 
{BRANCH IF weer ge 2 DATA FETCHED 
WAS FETCHED 


; : BR = 
7 THE FOLLOWING WILL TEST DSTM=6 MEPL 


7SET LOOP ON ERROR POINTER TO 17$. 
;MAKE PREVIOUS MODE “aes PRESENT SUPERVISOR 
MAKE Pee nee 2Al 

READ FROM PHYSI cag 

:POP SUPERVISOR STACK INTO R1 

[WAS DATA FETCHED SAME AS STORED 

BRANCH IF wre 1A FETCHED 


:REPLACE ERROR CALL WITH 
;'BR 17$'' = 000766 
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g 
~o 
j=) 
% 
wi 
~ 
nm 


18$: 7 THE FOLLOWING WILL TEST DSTM=7 MFPI. 


#19$,SLPERR :SeT LOOP ON ERROR POINTER TO 19S 
198: #040340 ,PSwW MAKE PREVIOUS MODE KERNEL PRESENT | SUPERVISOR 
0 R2 


latlatia’ 


ojlololeloleleloj=) 
RERKSEESS 


latlatiatiat 


ORT ROUT INE 
£60 BACK TO KERNEL OWE, PREVIOUS KERNEL 
[SET LOOP POINTER TO START OF TEST 
;MAKE SIPDR4 RESIDENT 
;;BRANCH TO NEXT TEXT 


(KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
er eto 


SAVE SRO FOR ERROR TYPEOUT 
;SAVE SR2 FOR ERROR TYPEOUT 
[CLEAR ERROR BITS IN SRO 
READ NON-RESIDENT PAGE 
OPE LOOP 


sREPLACE ERROR CALL WITH 
7A ‘NOP"’ = 000. 
TRAPPS,~(KSP) ;PUT PC & PS OF TRAP ON STACK 


TRAPPC ,~(KSP) 
;RETURN TO TEST 


PTTTTTPTTTTTTTTTITITITTTT TITTLE LT LLL LL 


; TEST 26 MFPI (KERNEL) TO USER MODE 


THIS TEST CHECKS + gh - THE PREVIOUS MODE IS KERNEL THE 
FETCH IS FROM KERNEL SPACE. 
THERE IS A DESCRIPTION BEFORE EACH DESTINATION MODE TESTED, 


IF THE CORRECT MODE IS NOT ENABLED A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 21$, WHERE THE ERRORS ARE REPORTED. 


WISTIT IIIT TT LTT Ltt itt iti i iii it ii iii iii titi 
$126: OPE 

oneal e MOV #1$ Ope ;SET LOOP ON ERROR TO 1$ 

:60 TO USER MODE FOR. THIS TEST 


;LOAD DATA PATTERN INTO PHY 
MOV al R2 ;LOAD VIR ae ADDRESS INTO R2 
: THE FOLLOWING WILL TEST DSTM=0 MFP 
033326 145324 ov #21$ ,MAVEC ;SET M.M. VECTOR TO 21$ 
144660 7MAKE USER I-SPACE PAGE 4 NON-RESIDENT 


UIPDR4 
140340 145040 MOV #140340 ,PSw ;MAKE PREVIOUS MODE KERNEL PRESENT USER 
: KSP ;PUT KERNEL STACK POINTER ON USER STACK 


wm: see eee ee 


—q + +s ooh eh 


_ 
wv 
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126 MFPI (KERNEL) TO USER MODE SEQ 0078 
104 032740 022 000600 cmp #USESTK ,USP WAS SOMETHING PUSHED ON STACK AT 1$ 
105 032744 00140 BEQ 5 BRANCH IF NOTHING WAS PUSHED 
106 032746 600 MOV (USP) +,RO ;POP USER STACK INTO RO 
107 032750 012701 001100 MOV #KERSTK,R1 SEXPECTING 1100 AS KSP 
108 032754 1 CMP RO,R1 ;DID YOU GET THE RIGHT POINTER? 

109 032756 001403 BEQ 6$ ;BRANCH IF YOU DID 

110 032760 104023 ERROR +23 WRONG THING WAS PUSHED ON STACK 

111 sFOR TIGHTER SCOPE LOOP 
311¢ ZREPLACE ERROR CALL WITH 
311 :'BR 4$'' = 000766 

114 032762 000401 BR 6$ [BRANCH TO NEXT TRY 

115 032764 106025 5$: ERROR +25 ;NOTHING PUSHED ON STACK 

138 sFOR TIGHTER SCOPE LOOP 
311 Aa eres ERROR CALL WITH 
3118 *= 0007 
$159 032766 6$: ; THE FOLLOWING WILL TEST DSTM=1 MFPI. 

120 032766 012767 032774 146114 Mov #7$,SLPERR :SET LOOP ON ERROR POINTER TO 7$ 
3121 032774 012767 140340 144774 /7$: MOV #140340,PSwW sMAKE PREVIOUS MODE KERNEL PRESENT USER 
3122 033002 012700 036514 MOV #36514 ,RO SLOAD DATA EXPECTED INTO RO 
3123 033006 012702 100000 MOV #100006 ,R2 [LOAD VIRTUAL ADDRESS INTO R2 
3124 03301 006512 MFP] (R2) ;READ FROM PHYSICAL 60000 

125 033014 012601 MOV (USP) +,R1 ;POP USER STACK INTO R1 

126 033016 020001 CMP RO,R1 zWAS DATA FETCHED SAME AS STORED 

127 033020 001401 BEQ 8$ ;BRANCH IF CORRECT DATA WAS FETCHED 
3128 033022 104023 ERROR +23 DATA WAS FETCHED 
3129 “FOR TIGHTER SCOPE LOOP 
3130 REPLACE, ERROR CALL WITH 
3131 = 000764 
3132 033024 8$: ; THE FOLLOWING fy TEST DSM=2 MEPI. 

3133 033024 012767 033032 146056 MOV #9$ ,SLPERR ;SET LOOP ON ERROR POINTER TO 9$ 

3134 033032 012767 140340 144736 9$: MOV #140340,PSw *MAKE PREVIOUS MODE KERNEL PRESENT USER 
3135 033040 012702 100000 100000; R2 SLOAD VIRTUAL ADDRESS INTO R2 

3136 03 MFP] (R2)¢ “READ FROM PHY 

3137 033046 012601 MOV (USP) +,R1 ‘POP USER STACK INTO R1 

3138 033050 020001 CMP RO,R1 ;WAS DATA FETCHED SAME AS STORED 

3139 033052 001401 BEQ 10$ ;BRANCH IF yore! DATA WAS FETCHED 

3140 033054 104023 ERROR +23 ZWRONG DATA WAS FETCHED 
3141 FOR TIGHTER SCOPE LOOP 
3142 ;REPLACE, ERROR CALL WITH 
3143 = 000766 
3144 033056 10$: : THE FOLLOWING WILL TEST’ * DSTM=3 MEPI. 

3145 033056 012767 033064 146024 MOV #11$,$LPERR 7SET LOOP ON ERROR POINTER TO 11$ 

3146 033064 012767 140340 144704 11$: MOV #140340 PSW sMAKE PREVIOUS MODE KERNEL PRESENT USER 
3147 033072 006537 100000 MFPI #100000 “READ FROM PHYSICAL 60000 

3148 033076 012601 MOV (USP) +,R1 “POP USER STACK INTO R1 

3149 033100 020001 CMP RO,R1 ;WAS DATA FETCHED SAME AS STORED 

3150 033102 001401 BEQ 12$ * BRANCH IF yoy DATA WAS FETCHED 
3151 033104 104023 ERROR +23 + WRONG DATA WAS FETCHED 

$125 ;FOR TIGHTER SCOPE 

315 ZREPLACE ERROR CALL WITH 

3154 1$*' = 000767 

3155 033106 12$: ZTHE FOLLOWING WILL TEST DSTM=4 MFPI. 

3156 033106 012767 033114 145774 MOV #13$,$LPERR ;SET LOOP ON ERROR POINTER TO 13% 

3157 033114 012767 140340 144654 13$: MOV H140840, PSwW :MAKE PREVIOUS MODE DERNEL PRESENT USER 
3158 033122 012702 100002 MOV #100002 ;-R2 : LOAD VIRTUAL ADDRESS INTO R2 

3159 033126 006542 MFP] —- =(R2) SREAD FROM PHYSICAL 

3160 033130 012601 MOV (USP) +,R1 ;POP USER STACK INTO R1 
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020001 CMP RO,R1 WAS DATA FETCHED SAME AS STORED 


001401 BEQ 14$ ‘BRANCH IF CORRECT DATA WAS FETCHED 
104023 ERROR +23 : D 


; THE FOLLOWING WILL TEST ‘ DSTM=5 MFPI. 


012767 033146 145742 #15$,SLPERR ;SET LOOP ON ERROR POINTER TO 15$ 
140340 144622 : #140340 ,PSw ;MAKE PREVIOUS MODE \ PRESENT USER 
100000 146020 #100000,$TMP2 ;LOAD TEST LOC. VIRT. ADDR INTO LOC. STMP2 
001204 MOV #<STMPC#2>, »R2 ;LOAD pe aaeg alh Y Simb20> INTO R2 


(USP) +,R1 “POP US 
RO,R1 : STORED 
BEQ 16$ “BRANCH IF CORRECT DATA FETCHED 
3177 033176 +23 : WRONG D 


3 

3179 

3180 3 = 
Sa 033200 : : THE FOLLOWING WILL TEST DSTM=6 MFPI. 


3183 033200 012767 145702 #17$,$LPERR 3SET LOOP ON ERROR POINTER TO 17$. 

3184 033206 012767 144562 : #140340 ,PSW MAKE PREVIOUS MODE KERNEL PRESENT USER 
3185 033214 005002 Re MAKE REGISTER 2 A ZERO 

100000 (R2) YSICAL 


006562 
012601 (USP) +,R1 
020001 RO,R1 Ss 
001401 E 18$ ;BRANCH IF CORRECT DATA FETCHED 
104023 +23 WRONG DATA WAS FETCHED 
FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
_ 17$°* = 000766 


3193 
fies 033232 : : THE FOLLOWING WILL TEST DSTM=7 MFPI. 


3196 033232 012767 033240 #19% ,SLPERR ;SET LOOP ON ERROR POINTER TO 19% 
3197 033240 140340 : #140540, PSwW ;MAKE PREVIOUS MODE KERNEL PRESENT USER 
3198 033246 100000 #100000,$TMP2  :LOAD TEST LOC. VIRT. ADDR. INTO $TMP2 
3199 033254 001202 #STMP2 ,R2 ;LOAD ADDRESS OF STMP2 INTO R2 
033260 006572 000000 (R2) READ FROM PHYSICAL 60000 
(USP) +,R1 :POP USER STACK INTO R1 
RO,R1 ;WAS DATA FETCHED SAME AS STORED 
BRANCH 4 Rey DATA FETCHED 
WRONG DATA WAS FETCHED 
:FOR TIGHTER SCOPE LOOP 
REPLACE ERROR CALL WITH 
;'BR 19$"* = 000762 
SET M.M. VECTOR TO NORMAL ROUTINE 
[GO BACK TO KERNEL MODE, PREVIOUS KERNEL 
[SET LOOP POINTER TO START OF TEST 
SMAKE UIPDR4 RESIDENT 
7 ;BRANCH TO NEXT TEXT 


(KSP)+,TRAPPC ;SAVE PC & PS OF TRAP 
012 (KSP) +, TRAPPS 
b16767 145720 SRO ,WASSRO ;SAVE SRO FOR ERROR TYPEQUT 
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033374 
3239 033376 
3240 033404 
3241 033412 
3242 
3243 033416 
3244 033422 


3260 033514 
3261 033516 
3262 


3264 033520 
3265 033526 
3266 033534 


354 
3371 033550 
3272 
3273 


016767 
7 


016746 
016746 
000002 


144226 
160000 


033526 
010340 
100000 
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145716 
144212 


144574 
137034 


145414 
144274 


2 
42 


-sk#ikt 
ee 
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2a 
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** 
-* 
e 
S 


i 


20$: 


7 
O5=DEC-79 14:41 PAGE $705 


SR2 WASSR2 ;SAVE SR2 FOR ERROR TYPEOUT 
a] 160000. SR [CLEAR ERROR BITS IN SRO 
: TO READ NON-RESIDENT PAGE 


; R SC LOOP 
;REPLACE ERROR CALL WITH 
"NOP"* = 00024 
TRAPPS ,=(KSP) “PUT PC & PS OF TRAP ON STACK 
TRAPPC ,=(KSP) 
;RETURN TO TEST 


RARER EEEEEEEEEEEREEEEEAEREKEREEKREEAEKREREREEKEEKEKEK 


T 27 MFPI (SUPERVISOR) WITH SUPER D-SPACE ENABLED 


THIS TEST USES THE *MFPI"® INSTRUCTION TO ENSURE THAT PREVIOUS 
MODE iS CLOCKED CORRRECTLY, AND THAT DSPACE IS NOT ENABLED. 


IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL 
OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 


RAERAEEEEKEEAEEEEEEEEERERERERERAEREEEEERAEEKEEERRREKEEEEERKEKKERE 


#20$,$LPADR :SET LOOP POINTER TO 20$ 
#20$.$LPERR 
#77400,RO 


RO, KDPDR4 


— I~SPACE PAGE 4 
OAD DATA PATTERN INTO RO 
LOAD DATA PATTERN INTO PHYS. 60000 
7SET M.M. VECTOR TO 10$ 
TENABLE SUPERVISOR D~SPACE 
CLRB KIPDR4 MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
; THE FOLLOWING WILL TEST DSTM=1 MFPI. 


#12$,$LPERR :SET LOOP ON ERROR POINTER TO 12$ 

#010340, PSW [MAKE PREVIOUS MODE SUPERVISOR 
#100000.R2 ;LOAD VIRTUAL ADDRESS INTO R2 

<R2) READ FROM PHYSICAL 60000 

(KSP)+,R1 “POP KERNAL STACK INTO R1 

0,R1 tWAS DATA FETCHED SAME AS DATA STORED 

SBRANCH IF CORRECT DATA FETCHED 

ERROR +37 WRONG DATA FETCHED 

;THE FOLLOWING WILL TEST DSTM=2 MFPI. 


#14$,,SLPERR 3SET LOOP ON ERROR POINTER TO 14$ 
#010340, PSW MAKE PREVIOUS MODE SUPERVISOR 

#100000 ,R2 "IRTUAL ADDRESS INTO R2 
(Ro) SICAL 100000 


(KSP)+,R1 
RO,R1 


° 


“WAS DATA FETCHED SAME AS DATA STORED 
BRANCH IF CORRECTDATA FETCHED 


ERROR +37 eee vet CHED 
; THE FOLLOWING WILL TEST DSTMS3 MF 
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T27 MFPI (SUPERVISOR) WITH SUPER D=SPACE ENABLED 


3274 033552 O1g767 033560 145330 5$: MOV #15$, SLPERR ;SET_ LOOP ON ERROR POINTER TO 15$ 
3275 033560 767 HAE os 144210 15$: MOV #010540, fy ;MAKE PREVIOUS MODE SUPERVISOR 
3276 033566 85 100000 MOV ;LOAD VIRTUAL ADDRESS INTO R2 


3277 033572 MFP] oni $0806. [READ FROM PHYSICAL 1 





7 
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127 MFPI (SUPERVISOR) WITH SUPER D=SPACE ENABLED 


3279 033576 012601 MOV (KSP)+,R1 ;POP KERNAL STACK INTO R1 y 
3280 033600 020001 CMP RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
001401 BEQ 6$ BRANCH IF CORRECTDATA FETCHED 
104037 ERROR +37 [WRONG DATA FETCHED 
; THE FOLLOWING WILL TEST DSTM=4 MFPI. 


012767 6$: fro #16$,$LPERR ;SET LOOP ON ERROR POINTER TO 16$ 
: #010340,PSW [MAKE PREVIOUS MODE SUPERVISOR 
#100002 -R2 ; LOAD VIRTUAL ADDRESS INTO R2 
=(R2) “READ FROM PHYSICAL 100000 
(KSP)+,R1 [POP KERNAL STACK INTO R1 
RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
7$ ‘BRANCH IF CORRECTDATA FETCHED 
+37 ‘WRONG DATA FETCHED 
WMGMERR ,MMVEC SET M.M. VECTOR TO NORMAL ROUTINE 
#20$, $LPERR ‘SET LOOP ON ERROR POINTER TO START OF TEST 
#6,KIPDRG SMAKE KIPDR4 RESIDENT 
#B1T1,MMR3 ‘DISABLE SUPERVISOR D-SPACE 
TST30 + ;BRANCH TO NEXT TEST 


MRO ,WASSRO : SAVE MMRO FOR ERROR TYPEOUT 
MMR ,WASSR1 
MMR? ,WASSR2 

3 SR3 


(KSP5+,TRAPPC SAVE PC & PS OF TRAP 
(KSP) +, TRAPPS 
0 ;TRIED TO READ NON-RESIDENT PAGE 


+4 
TRAPPS,-(KSP) PUT PC & PS OF TRAP ON STACK 
TRAPPC ,~(KSP) 


76 
32 
30 
22 
14 


3306 033734 
3307 033740 
3308 033744 
3309 


3319 FLEA E EER EERE KEEEEREEREEKEEEERREEREEKEEE 


ssTEST 30 MTPI (SUPERVISOR) WITH SUPER. D-SPACE ENABLED 


THIS TEST USES THE *MTPI* INSTRUCTION TO ENSURE THAT THE 
eee MODE IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT 


NABLED 
IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 


TORR RAAESZASASCALASZALZALLASLASALASSLASZLASELL EASES ETERS TREES RE SRR RAR ASS SO 
033746 000004 130: SCOPE 
3320 033750 
3321 033750 012767 034264 MOV #10$ ,MMVEC :SET M.M. VECTOR TO 10$ 
3322 033756 052767 000002 BIS #B1T1,MMR3 TENABLE SUPERVISOR D-SPACE 
3303 :THIS WILL TEST DSTM = 1 MTPI 
3354 033764 012767 034010 MOV #13$,$LPERR :SET LOOP ON ERROR POINTER TO 13$ 
010340 mo10840, PSW ;MAKE PREVIOUS MODE SUPERVISOR 
100000 #100000.R5 “LOAD VIRTUAL ADDRESS INTO R5 
125252 #125252, R3 {TOAD TEST DATA INTO R3 
: R3,-(kSP) *PUSH TEST DATA ONTO KERNAL STACK 
136272 KIPDR4 “MAKE KERNAL PAGE 4 NON-RESIDENT 
(R5) “LOAD TEST DATA INTO PHYSICAL 100000 
000006 MOVB #006, KIPDR4 “MAKE KERNAL I PAGE 4 RESIDENT 
(R5) RG SREAD FROM ADDRESS 100000 
R3,R4 *SEE IF DATA WAS STORED AT CORRECT PLACE 
3334 034032 4$ BRANCH IF STORE WAS CORRECT 


peg see ee 8 


TK) mt Be Be Be Be Be Be Be 





> 
CKKTBBO 11/44 MEM MGMT PRT B MACRO M1113 OS=DEC-79 14:41 PAGE 38-1 
T30 MTPI(SUPERVISOR) WITH SUPER. D-SPACE ENABLED 


3335 034034 104035 ERROR +35 ; INCORRECT STORE 


sTHIS WILL TEST OF S$ ey: MTPI 
337 034036 012767 is: MOV PERR :SET LOOP ON ERROR POINTER TO 14$ 
338 034044 w010820 6 PSW “MAKE PREVIOUS TYPE SUPERVISOR 
3339 034052 #52525,R3 [LOAD TEST DATA INTO R3 
3340 034056 14$: MOV R3, ~(kS§P) ‘PUSH TEST DATA ON KERNAL S loans 
KIPDR4 *MAKE KERNAL I PAGE 4 NON-RES! 
310 “LOAD TEST DATA INTO PHYSICAL #60000 
KIPDR4 {MAKE KERNAL I PAGE 4 RESIDENT 
2106000, R4 [READ FROM ADDRESS 100000 
;SEE IF DATA WAS STORED eaten 
SBRANCH IF STORED CORRECTL 
ERROR +35 S INCORRECT STORE 
“THIS WILL TEST DSTM = 4 MTPI 


144772 5$: MOV #15$,$LPERR :SET LOOP ON ERROR POINTER TO 15$ 
143652 #010340,PSw [MAKE PREVIOUS TYPE SUPERVISOR 
#125252.R3 ‘LOAD TEST DATA INTO R3 
15$: P) [PUSH TEST DATA ON KERNAL STACK 
#100002 ,R5 [LOAD VIRTUAL ADDRESS INTO R5 
[MAKE KERNAL I PAGE 4 NON-RESIDENT 
‘LOAD TEST DATA INTO PHYSICAL 100000 
[MAKE KERNAL I PAGE 4 RESIDENT 
TREAD FROM ADDRESS 100000 
SEE IF DATA WAS STORED CORRECTLY 
*BRANCH IF STORED CORRECTLY 
+35 : INCORRECT STORE 
DSTM = 6 MIPI 


144716 6%: MOV #16$ ,SLPERR SET LOOP ON ERROR POINTER TO 16$ 
143576 #010340 ,PSW ZMAKE PREVIOUS TYPE SUPERVISOR 
#52525 ,R3 ;LOAD TEST DATA INTO R3 
R5 SMAKE R5 ZERO 


PUSH TEST DATA ON _— STACK 
MAKE KERNAL I PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO PHYSICAL 100000 
:MAKE K KERNAL 1 PAGE 4 RESIDENT 


-_— OOO 


e 


BNR NSS 


;READ FROM ADDRESS 100000 
3 SEE M4 DATA_WAS STORED a 
H_ IF STORED CORRECT 
INCORRECT STORE 
:SET LOOP ON ERROR POINTER TO START OF TEST 
CTOR TO NORMAL ROUTINE 


7 SAVE PEOUT 
; TRIED TO LOAD A NON-RESIDENT PAGE 4 
;RETURN TO TEST 


MARRS AASSSALLLL£LESE SEALER ASSES ESLER REARS ERR RRR RRA SARA RRR RSA SRDS SE SD 


TATEST 31 MTPI (USER) WITH USER D-SPACE ENABLED 


THIS TEST USES THE "MTPI* INSTRUCTION TO ENSURE THAT THE 
: PREVIOUS MODE IS CLOCKED CORRECTLY, AND THAT D-SPACE IS NOT 


ED. 
IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 





CKKTBBO 11/44 MEM MGMT PRT B 


MACRO M1113 eenre: 14:41 PAGE $3.5 


MTP] (USER) WITH USER D=SPACE ENABLED 


namene oooo 
gaagesss 
RNS o 


: 


and aah nd aut an an cad esd eed eed 
\ 
o 


WONAWUSWR— 


KREEELELE KEELES ELE 


: 


a 
bs 
% 
ooo 
is 
34 
Ae) 
% 
% 
oo 
34 
% 
4 
oo 
3a 
oo 
4 
% 
34 
aa 
4 
4 
oo 
34 
34 
34 
3h 
54 
4 


elolelolelejloleoleololomeolojlojleleloleleloleloj=) 


BUFARANLSYSVRARASLS 


FF 
Se 


052767 
012767 


100000 
125252 
135720 
000006 


034430 
030340 
052525 
135652 
100000 


135710 


144472 


143352 


144420 
143300 


144344 
143224 


135510 


$131: 
20$: 


° 
F RARER AERARERATEAEAEAEEAAEAERARAARAEARAARAAEREEAAAEREREEERARKEEE 


SCOPE 
MOV 


MOV 

BIS 
;THIS WILL TEST 

MOV 


ERROR 
;THIS WILL TEST 
4$: MOV 


14$: 


ERROR 
;THIS WILL TEST 
MOV 


S$: 


15$: 


#77400, SIPDR4 
#77406 ,UIPDR4 


#10$ .MAVEC 


#8170, MMR3 
DSTM = 1 MTPI 


#13$,SLPERR 
#030340,PSw 
#100000.R5 
#125252.R3 
R3,-(KSP) 
KIPDR4 

(R5) 

#006 ,KIPDR4S 
(R5) RS 


R3,R4 
4$ 


+35 
ie = 3 MTPI 


+35 

DsIm = 
#15$,$LPERR 
4030840, PSW 

#125252,R3 


£0 
#52525, 

R5 

af =~ ea 


1900005), 
a4#100000,R4 
R3,R4 

7$ 


MAKE SIPDR4 NON-RESIDENT 

MAKE UIPDR4 RESIDENT 
SET M. m VECTOR TO 10$ 
;ENABLE USER D=SPACE 


;SET LOOP ON ERROR POINTER TO 13$ 
VIOUS MODE USER 
NTO R5 


; VIRTUAL ADDRESS 
;LOAD TEST DATA INTO R 
;PUSH TEST DATA ONTO KERNAL bay 
;MAKE KERNAL PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO PHYSICAL 100000 
;MAKE K KERNAL I PAGE 4 RESIDENT 
;READ FROM ADDRESS 100000 
SSEE IF DATA WAS STORED AT CORRECT PLACE 
BRANCH IF STORE WAS CORRECT 
: INCORRECT STORE 


SET LOOP ON ERROR POINTER TO 14$ 
;MAKE PREVIOUS TYPE USER 

;LOAD TEST DATA INTO R3 

SPUSH TEST DATA ON KERNAL STACK 
MAKE KERNAL I PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO PHYSICAi 100000 
;MAKE K KERNAL Bh oF RESIDENT 


READ FROM AD S$ 100000 
ZSEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORED CORRECTLY 
z INCORRECT STORE 


;SET LOOP ON ERROR POINTER TO 15$ 

MAKE PREVIOUS TYPE USER 

;LOAD TEST DATA INTO R3 

:PUSH TEST DATA ON KERNAL STACK 

;LOAD VIRTUAL at INTO R5 

3MAKE KERNAL I PAGE 4 NON-RESIDENT 

LOAD TEST -—. INTO PHYSICAL 100000 

MAKE K KERNAL I PAGE 4 RESIDENT 
READ FROM ADDRESS 100000 

[SEE IF DATA WAS STORED Senne TRY 

BRANCH IF STORED CORRECTL 

; INCORRECT STORE 


;SET LOOP ON ERROR oe TO 16% 
;MAKE PREVIOUS TYPE USE 
;LOAD TEST DATA INTO RS 

E R5 ZERO 


> MAK 

;PUSH TEST DATA / oo STACK 
;MAKE KERNAL I PAGE 4 NON-RESIDENT 
;LOAD TEST DATA INTO PHYSICAL es 
;MAK KERNAL I PAGE 4 RESIDENT 

;READ FROM ADDRESS 100000 

:SEE IF DATA WAS STORED CORRECTLY 
BRANCH IF STORED CORRECTLY 
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131 MTPI (USER) WITH USER D=SPACE ENABLED 


3439 034610 104035 E 35 ; INCORRECT STORE 
3440 034612 : L ON ERROR POINTER TO START OF TEST 
OR TO NORMAL ROUTINE 


7 SAVE MAR2 F TYPEOUT 
; TRIED TO LOAD A NON-RESIDENT PAGE 4 
;RETURN TO TEST 


: PITITITI TTT T TIT T TTT tT TTT tT iii iti iti titi iii etr 


;*TEST 32 MF PI (PREV 1OUS=CURRENT=KERNEL ) 


THIS TEST CHECKS THAT IF BOTH PREVIOUS AND CURRENT MODES 
ARE KE AND THE SOURCE MODE IS 0, THE DESTINATION 
STACK IS NOT DECREMENTED BEFORE ACCESS. 
“MFPI KSP’' SHOULD PUSH THE NON-DECREMENTED VALUE 
OF KSP (1100) ONTO THE STACK (AT LOC. 1076). 
PITT TITETITELTTTTT ELT E LLL ELLE LLL 


T3ee 


Se 


wu: sen neen 


oe. 


ee ee ee 


135442 


#6 ,KDPDR4 MAKE KDPDR4 RESIDENT 

a4PSW SET PREVIOUS = CURRENT = KERNEL 
#STACK ,RO ZSETUP VALUE FOR STACK POINTER 
RO,KSP ; NTER 

KSP ; UE ‘'STACK’* SHOULD BE PUSHED 


;BEF ORE 
(KSP) ,R1 READ DATA WHICH WA 
RO,R1 


S PUSHED 
zWAS THE ORIGINAL VALUE OF THE 
De edo PUSHED? 


7 BRAN 

;MFPI FETCHED WRONG DATA 
FOR TIGHTER SCOPE LOOP 
SREPLACE ERROR CALL WITH 
* 1$'" = 000766 


SETUP EXPECTED STACK POINTER VALUE 
WAS THE STACK POINTER DECREMENTED? 
*BRANCH IF YES 

ACK NOT PUSHED BY JHE MFPI 
[FOR TIGHTER SCOPE LOOP 
:REPLACE ERROR CALL WITH 
;‘BR 1$°* = 000762 


3$: MOV #STACK .KSP SRESTORE STACK POINTER 


LFA AAA REE REET EAA AREER EKERRAEREERREREREE EE 


s*TEST 33 MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED 


THIS TEST CHECKS TO SEE THAT THE REFERENCE IS TO D-SPACE 
IF THE INSTRUCTION IS AN MFPD. 


IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT 
WILL OCCUR AND TRAP TO 10%, WHERE THE ERRORS ARE REPORTED. 


MASRERASALALELALSSLALESASE RRS ASSES ASRS ALAR SRR EAR RR RASA RRR RRA RARE SS 


#20$, a 3SET LOOP POINTER TO 20$ 
#20$ ,SLPE :SET ON ERROR POINTER TO 20% 
#600 SDPARG TO 12k 

3493 034752 : MOV #77460 ,RO sMAKE PAGE 4 IN ALL BUT SUPERVISOR D 
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133 MFPD (SUPERVISOR) WITH SUPER D=SPACE ENABLED 


RNAL | a” ye 


135224 


3 INTO RO 
[LOAD DATA PATTERN INTO PHYS. 100000 
143226 1 7SET M.M. VECTOR TO 10$ 
135466 ;ENABLE SUPERVISOR D-SPACE 
CLRB KIPDR4 MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
;THE FOLLOWING WILL TEST DSTM=1 MFPD 


144046 2$: #12$,$LPERR :SET LOOP ON ERROR POINTER TO 12% 
142726 : #010340,PSW [MAKE PREVIOUS MODE SUPERVISOR 
#100000 ,R2 :LOAD VIRTUAL ADDRESS INTO R2 
(R2) ; READ FROM PHYSICAL 100000 
(KSP)+,R1 POP KERNAL STACK INTO R1 
RO,R1 “WAS DATA FETCHED SAME AS DATA STORED 
BEO 4$ [BRANCH IF CORRECT DATA WAS FETCHED 
3514 035064 ERROR +37 *WRONG DATA WAS FETCHED 
3515 ;THE FOLLOWING WILL TEST DSTM=2 MFPD 
3517 035066 144014 4$: #14$,SLPERR :SET LOOP ON ERROR POINTER TO 14$ 
3518 035074 010340 142674 : #010340, PSW ;MAKE PREVIOUS MODE SUPERVISOR 
100000 #100000. R2 [LOAD VIRTUAL ADDRESS INTO R2 
(R2)+ “READ FROM PHYSICAL 100000 
(KSP)+,R1 :POP KERNAL STACK INTO R1 
RO,R1 [WAS DATA FETCHED SAME AS DATA STORED 
BEQ 5$ ;BRANCH IF CORRECT DATA WAS FETCHED 
3524 035116 ERROR +37 WRONG DATA WAS FETCHED 
3525 7 THE FOLLOWING WILL TEST DSTM=3 MF PD 


3526 : 

3527 035120 5$: #15$,$LPERR ;SET LOOP ON ERROR POINTER TO 15$ 

: 4 : #0103840,PSw ;MAKE PREVIOUS MODE SUPERVISOR 
#100000, R2 [LOAD VIRTUAL ADDRESS INTO R2 
a#100006 “READ FROM PHYSICAL 100000 
(KSP)+,R1 [POP KERNAL STACK INTO R17 
RO,R1 SWAS DATA FETCHED SAME AS DATA STORED 
rx 3 SBRANCH IF CORRECT DATA WAS FETCHED 

3534 035152 ERROR +37 SWRONG DATA WAS FETCHED 

3535 ;THE FOLLOWING WILL TEST DSTM=4 MFPD 


3536 

3537 035154 
3538 035162 
3539 035170 


3540 035174 
3541 035176 
542 035 


521 
3547 035022 
3548 0352 


3549 035234 
3550 035240 


#16$,$LPERR 
#010540, PSW 
#100002.R2 


wiRD) A 
(KSP)+,R1 
0,R1 


+37 


#MGMERR , MMVE C 
#20$,$LPERR 
#8111 ,MMAR3 


RO, UDPDR4 


;SET LOOP ON ERROR POINTER TO 16% 
;MAKE PREVIOUS MODE SUPERVISOR 
LOAD VIRTUAL art INTO R2 
;READ FROM F:IYSICAL 100000 
:POP KERNAL STACK INTO R1 
WAS DATA FETCHED SAME AS DATA STORED 
BRANCH IF CORRECT DATA WAS FETCHED 
WRONG DATA WAS FETCHED 
;RESTORE M.M. VECTOR 
yd LOOP ON ERROR POINTER TO START OF ROUTINE 
DISABLE SUPERVISOR D~SPACE 
SET UP RO FOR 4k + ee R/wW 
:MAKE KIPAR4 RESIDENT 
MAKE UDPDR4 RESIDENT 
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MFPD (SUPERVISOR) WITH SUPER D-SPACE ENABLED SEQ 0087 
3551 035244 0004623 BR S734 :BRANCH TO NEXT TEST 
$52 035266 016767 142320 144010 10%: MOV MMRO,,WASSRO SAVE MMRO FOR ERROR TYPEOUT 
553 035254 016767 142314 144004 MOV MMR1.WASSR1 SSAVE MMR1 FOR ERROR TYPEOUT 
3354 035 016767 142310 144000 MOY MMR2WASSR2 [SAVE MMR2 FOR ERROR TYPEOUT 
555 035 012667 143764 MOV (KSP5+,TRAPPC SAVE PC & PS OF TRAP 
3556 035274 012667 143762 MOV (KSP) +, TRAPPS 
3557 035300 104 ERROR +40 :TRIED TO READ NON-RESIDNT PAGE 
3558 035302 016746 143754 MOV TRAPPS , =(KSP) T PC & PS OF TRAP ON STACK 
3559 035306 016746 143746 MOV TRAPPC ,=(KSP) 
3560 035312 000002 RTI ;RETURN TO TEST 
3573 FLARE REE REAR E ERE A AAA AERA REAR EERE REAR EER EERE EES 
S*TEST 34 MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 
** 
te THIS TEST CHECKS THAT IF THE INSTRUCTION IS EITHER MFPI OR 
:* MTPI AND BOTH THE PRESENT AND PREVIOUS MODES ARE USER, THEN 
* D-SPACE 1S USED IF IT IS ENABLED. IN THIS WAY AN OPERATING 
* SYSTEM CAN MAKE PROPRETARY CODE “EXECUTE ONLY’’ FOR THE USER. 
** 
* IF THE CORRECT MODE IS NOT ENABLED, A NON-RESIDENT ABORT WILL 
:* OCCUR AND TRAP TO 10$, WHERE THE ERRORS ARE REPORTED. 
** 
j {Setnennnenaanasenaeeaceratensenneeaananensensenneanseenesensees 
035314 000004 15134: SCOPE 
3574 035316 012767 035332 143562 MOV #20$,$LPADR ;SET LOOP POINTER TO 20$ 
3575 035324 012767 035332 143556 MOV #20$.$LPERR “SET LOOP ON ERROR POINTER TO 20S 
337%6 035332 012767 000600 142330 20$: MOV #600, UDPAR [MAP UDPARG TO 12k 
3577 035340 012700 036514 MOV #36514,RO SLOAD DATA PATTERN INTO RO 
3578 035344 010037 100000 MOV RO,a#100000 ‘LOAD DATA PATTERN INTO PHYS. 100000 
3579 035350 012767 035606 142672 MOV #10$ ,MMVEC [SET M.M. VECTOR TO 10$ 
3580 035356 052767 000001 135132 BIS #81T0,.MMR3 SENABLE USER D-SPACE 
3581 035364 105067 134640 CLRB —- SDPDR4 ‘MAKE SDPDR4 NON-RESIDENT 
3582 035370 105067 134714 CLRB —«KIPDR4 “MAKE KERNAL I-SPACE PAGE 4 NON-RESIDENT 
3583 :THE FOLLOWING WILL TEST DSTM=1 MFPI 
3585 035374 012767 035402 143506 28: MoV #12$,$LPERR :SET LOOP ON ERROR POINTER TO 12$ 
3586 035402 012767 170340 142366 12$: MOV #170340,PSW :SET PREVIOUS MODE TO USER 
3587 035410 012702 100000 MOV #100000.R2 ;LOAD VIRTUAL ADDRESS UNTO R2 
3588 035414 006512 MFP] (R2) “READ FROM PHYSICAL 100000 
3589 035416 012601 MOV (USP) +,R1 ‘POP USER STACK INTO R1 
3590 035420 020001 CMP RO,R1 SWAS DATA FETCHED SAME AS DATA STORED 
3591 035422 001401 BEQ 4$ SBRANCH IF CORRECT DATA WAS FETCHED 
3592 035424 104037 ERROR +37 + WRONG DATA, WAS FETCHED 
$207 :THE FOLLOWING WILL TEST DSTM=2 MFP 
3595 035426 012767 035434 143454 4$: Mov #14$,$LPERR :SET LOOP ON ERROR POINTER TO 14$ 
3596 035434 012767 170340 142334 14$: MOV #170340 ,PSW 3SET PREVIOUS MODE TO USER 
3597 035442 012702 100000 MOV #100000.R2 [LOAD VIRTUAL ADDRESS INTO R2 
035446 006522 MFP] (R2)+ “READ FROM PHYSICAL 100000 
3599 035450 012601 MOV (USP) +,R1 ‘POP USER STACK INTO R1 
035452 020001 CMP RO,R1 tWAS DATA FETCHED SAME AS DATA STORED 
3601 035454 001401 BEQ 5$ ;BRANCH IF CORRECT DATA WAS FETCHED 
3602 035456 104037 ERROR +37 WRONG DATA WAS FETCHED 
3603 :THE FOLLOWING WILL TEST DSTM=3 MFPI 
3605 035460 012767 035466 143422 5$: MOV #15$,$LPERR :SET LOOP ON ERROR POINTER TO 15$ 
3606 035466 012767 170340 142302 15$: MOV #170340 ,PSw *SET PREVIOUS MODE TO USER 
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1% MFPI (USER/PREV USER) WITH USER D-SPACE ENABLED 


012702 100000 MOV #100000 ,R2 :LOAD VIRTUAL ADDRESS INTO R2 
537 100000 a#100000 [READ FROM PHYSICAL 100000 
12601 (USP)+,R1 ‘POP USER STACK INTO R1 
RO,R1 SWAS DATA FETCHED SAME AS DATA STORED 
0 BE 6$ {BRANCH IF CORRECT DATA WAS FETCHED 
TA WAS FETCHED 


4 
03 ERROR +37 WRONG DATA 
; THE FOLLOWING WILL TEST DSTM=4 MFPI 


#16$,$LPERR ;SET LOOP ON ERROR POINTER TO 16$ 
#170540, “PS TO USER 


wtRD) 3 SI 

(USP) +,R1 ;POP USER STACK INTO R 

RO,R1 WAS DATA FETCHED SAME 4s DATA STORED 

7$ BRANCH IF yr 3 DATA WAS FETCHED 

+37 WRONG DATA WAS FETCHED 

WMGMERR ,MMVEC RESTORE M.M. VECTOR 

#208 SLPERR ; LOOP ON ERROR POINTER TO START OF ROUTINE 
340 ,P 


3: 


006 
0 

001 
104 


a ed ce ced ed ed ed ed od ed 
mse 


etetestetertetestext-tox 
BS RERRRR SEES SSeS es 
SESSSSSSSSssEs 
SIS REE REN 
RSRKR 


RAR 
EEE 
RR 
ORS 


MMR2 -WASSR2 : 
(KSP5+,TRAPPC :SAVE PC & PS OF TRAP 


(KSP) +, TRAPPS 
+40 TRIED TO READ NON-RESIDENT PAGE 
TRAPPS,-(KSP) ;PUT PC & PS OF TRAP ON STACK 
3636 035646 TRAPPC ,~(KSP) 
3637 035652 000002 ;RETURN TO TEST 
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%47 Lee e eee ee eee TTA T ATT eRe ATER RATER ERRATA ETRE R Re 
;*TEST 35 TEST CSM INSTRUCTION 
:  ReA RARER EAT A AAA RATATAT ATER AARAARAAAAARA ATA ee REAR A Ree 
THIS TEST CHECKS OUT THE CSM (CALL SUPERVISOR MODE) 
INSTRUCTION TO MAKE SURE IT CAN BE ENABLED AND 
1? yg IT WORKS PROPERLY IN THE PROPER 


RRA EEEREEAERARAEEREAERAEEAARERAEREKKKKEKEKE 
SERA AEARAREEEEKEAEEARERKERKEKKKKKKKKEE 


$135: 
MRS sMAKE SURE MARS IS CLEARED 
PSW SMAKE SURE PSW PREVIOUS=CURRENT=KERNEL 
RESVEC ,STMP3 ;SAVE TRAPS TO 10 VECTOR 
#1$ ,RESVEC Any og TO 10 bo TO \, a 


— Be Be Be Be Be Be 


NSTRUCTION. AT THE TIME 


FI 
LINE WHENEVER IT SEES ve | om 
“WORD 007000 ; id INSTRUCT ION 


MMRO TUR OFF MEMORY MANAGEMENT 
STMP3,RESVEC  :RESTORE TRAPS TO 10 VECTOR 
3656 035722 #1$, (SP)+ “SEE IF IT WAS AN EXPECTED TRAP 
3657 035726 0014 15$ BRANCH AROUND ERROR CALL IF IT WAS 
3658 035730 CMP (SP) +, (SP)+ SCORRECT STACK 
3659 035732 10404 +41 [ILLEGAL CSM DID NOT TRAP TO 10 
3660 035734 1 16$ “BRANCH AROUND STACK CORRECTION 
: (SP)+ ;CORRECT STACK 
142042 : MOV #2$ ,RESVEC : TRAPS S TO 10 GO TO 2$ 
142022 #40000, PS NOW IN OUPERVISOR MODE 


INC ON MEMORY MANAGEMENT 
; THE FOLLOWING **.WORD 00 onset Ts ACTUALLY THE ‘'CSM’’ INS ets Bd THE TIME 
THIS WAS COMPILED, COMPILER WAS UNABLE TO INTERPRET i af STRUCT ION 

N THE SOURCE FILE, SO A MACRO PRINTS THIS COMMENT AND T WORD 007000°* 
LINE WHENEVER IT SEES ae | » « IN THE SOURCE FILE. 
“WORD 007000 ; “CSM ass Dang Abo. 


: MRO TURN OFF Y MANAGEMENT 
142014 $TMP3,RESVEC _:RESTORE TRAPS TO 10 VECTOR 
#2$,(SP)+ [SEE IF IT WAS AN EXPECTED T 
BRANCH woe ERROR CALL IF oe WAS 
(SP)+, (SP)+ SCORRECT STAC 

+41 eTLt LEGAL oom DID NOT TRAP TO 10 
268 CH AROUND STACK CORRECTION 
#3 RESVEC 
#140000 ,PSW 

MRO 


AT THE 


MENT 
Teen 7 INSTRUCTION. TIME 
M’* INSTRUCTION 
WORD 007000" ' 


LINE WHENEVER IT SEES me He eset SOURCE FILE. 
D 007000 iT " INSTRUCTION 
: MMRO TURN OFF MEMORY MANAGEMEN; 
141742 STMP3,RESVEC ;RESTORE TRAPS TO 10 VECTOR 
MP A3$,(SP)+ SEE IF IT WAS on EXPECTED TRAP 


CH AROUND ERROR CALL IF IT WAS 
3682 036054 022626 (SP)+,(SP)+ CORRECT STACK 
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T35 


3683 036056 
36060 


SRANVS 


3722 036266 
3723 036272 
3724 036276 
3725 
3726 
3727 
3728 036302 


3735 036346 


ese} 


“4 7 
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+41 
36$ 
35$: (SP)+ 
36$: > Aid MMR 
pra Wet RESVEC 
; THE FOLLOWING **.WORD 00 


R WAS UNABL 
OURCE FILE, SO A MACRO | PRINTS THIS COMMENT 
LINE WHENEVER IT SEES THE weno HE SOURCE FILE. 
+ bORD 007000 


MRO 
STMP3 ,RESVEC 
#43, + 


45$ 
(SP)+,(SP)+ 
+41 


46$ 
(SP)+ 
PC,APRINIT 


- ILLEGAL CSM DID NOT TRAP TO 10 
(CH AROUND STACK CORRECTION 


ON MEMORY MANAGEME 
007000" 13 ACTUALLY THE COM” INS TRUCTION. AT THE TIME 
ETO INTERPRET THE CSM" INSTRUCTION 
AND THE **.WORD 007000" 


sTHE °C INSTRUCTION 
iT F ME 


OF MORY MANAGEMENT 
SRESTORE TRAPS TO 10 VECTOR 
SEE IF IT WAS AN EXPECTED TRAP 
H_ AROUND ERROR CALL IF IT WAS 
CORRECT STACK 


ZILLEGAL CSM DID NOT TRAP TO 10 
S BRANCH wt STACK CORRECTION 
CORRECT STAC 

RESET ALL MEMORY MANAGEMENT REGISTERS 


ze * CSM FROM SUPERVISOR I-SPACE 


#52525 ,RO 
#CSMWISE poseane 

7600 SDPARO 

7 wae 

aS psa” -RESVEC 
#SUPSTK ,SSP 
#80, SRCALL 

PC, CSMSUB 


SDPARO 


7SET UP RO 
[SET UP CSM WRONG SPACE ERROR 
i IF WE y: By D-SPACE, FLAG AS AN ERROR 
; ENABLE 22-BIT, SUPERVISOR SPACE 
;PUT SUPERV isOR MODE IN R2 
;SET UP TRAPS TO 10 VECTOR 
:GO TO SUPERVISOR MODE 
3SET THE SUPERVISOR STACK 

ADDRESS OF SUBROUTINE CALL TO SRCAIL 
STEST CSM INSTRUCTION SUBROUTINE 
ZRETURN TO KERNEL MODE 
RESET SDPARO TO FIRST 4K 


i” 
7* CSM FROM SUPERVISOR D-SPACE 
* 


#600 , SIPARO 
#CSMEC -@#60010 


R2,P 
#81$,SRCALL 
PC, CSMSUB 


PSW 
SIPARO 


133772 
060010 


000736 


3* 
37* CSM FROM USER I-SPACE 


#14 R2 
acsme, »RESVEC 
#USESTK,USP 


#82$, SRCALL 
PC, CSMSUB 


71F WE GO TO I-SPACE, FLAG IT AS AN ERROR 
; TO 10 + 60000 AS MAPPED BY SIPARO 


;RETURN KERNEL "MODES 
;RESET SIPARO TO FIRST 4k 


: TURN ON USER, 22-BIT, CSM 
WE GO TO DSPACE FLAG AS AN ERROR 
“MOVE User MODE TO R 
:SET UP TRAPS TO 10 VECTOR 
;GO_TO USER MODE 
SET USER STACK 
;MOVE ADDRESS OF SUBROUTINE CALL TO SRCALL 
TEST CSM INSTRUCTION SUBROUTINE 
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736 036352 003007 414 CLR PSW 
oe 036356 005067 _ UDPARO 


:* - cm FROM USER D-SPACE 


012767 


ae 


7 
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RETURN TO KERNEL MODE 
RESET UDPARO TO FIRST 4k 


GO TO I-SPACE, FLAG AS AN ERROR 
10 VECTOR 


oe 
ADDRESS OF SUBROUTINE CALL TO SRCALL 
T CSM INSTRUCTION SUBROUTINE 


RETURN TO KERNEL 
RESET UIPARO TO FIR 


[TURN OFF 22-BIT tsa. INSTRUCTION D-SPACE 
[JUMP TO END OF PASS ROUTINE 


eetereereNO TE rexeaeane 


ALL ERROR CALLS IN THIS SUBROUTINE, THE ‘‘SUB CALL’ FIGURE IS THE 


TIN 
;ADDRE SS OF THE J 


JSR THAT CALLED THE SUBROUTINE THAT RESULTED IN THE 


BECAUSE THE SUBROUTINE IS USED 4 TIMES IN THE TEST, IT IS 
[IMPORTANT TO KNOW WHICH JSR WAS ACTIVE WHEN THE ERROR WAS CALLED. 


016703 : PSW,R3 
010605 SP,R5 
3760 036446 
3761 036452 
3762 
036456 
3763 036460 141322 CSMPC: 
3764 036466 
3765 036472 
66 
CSMRET 


R3,-(SSP) 
#37777 ,R3 


142422 


+4 

PC ,PSHSTK 
MARO 
PSW,R4 


CE FILE, MACRO | 
SLINE WHENEVER IT SEES THE ‘CSM’ IN 
~ WORD sTHE *'C 
$TMP3 , RESVEC 
#CSMPC , (SP) 


MRO 
(SP)+,(SP)+ 
+51 


sSTORE PRE-CSM PSW IN R3 
7MOVE STACK POINTER = * 79 


oy dog 6 FROM RS - ae PUSHES ON STACK 


ON MEMORY Y MANAGEMEN aNT 
00000" "3 ACTUALLY THE ‘‘CSM’’ INSTRUCTION. AT THE TIME 


UNABLE TO INTERPRET. THE eee INSTRUCT ION 
PRINTS THIS COMMENT AND THE ‘’.WORD 007000°° 
N THE SOURCE FILE. 

NSTRUCTION 


3PU: CSM PSW ON ST ACK 
SWIPE OUT ALL BITS ners <15:14>, 
7CLEAR THE CARRY 
:MOVE <15:14> OVER t6 
+ THE RIGHT TO <15:12>, 
SET ,14>, PUTTING ‘01'* IN <15:1 
MOVE (Coop” sorpe pl STACK SUB RNS) TO LCNT+1 


; WIPE ALL B BUT <15:12> 
SEE 4 PSwW STATUS BITS MATCHES CALCULATED VALUE 
H AROUND ERROR CALL IF OK 
‘TURN OFF MEMORY MANAGEMENT 
7STORE PSW FOR PRINTOUT 
7STORE R3 FOR PRINTOU 


:60 RESTORE STACK 
; TURN MEMORY MANAGEMENT BACK ON 
;MOVE CURRENT PSW TO R4 
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3789 036612 037777 #37777 ,RG CLEAR ALL BITS EXCEPT <15:14> 
022704 040000 MP : SEE i SUPERVISOR MODE 


140742 MMRO ; TURN OFF MEMOR 
7STORE R4 FOR PRINTOUT 
142326 [STORE 40000 I 


+4 3 SUPERVISOR 

PC ,PSHSTK :G0 RESTORE STACK 

MMRO ; TURN MEMORY MANAGEMENT BACK ON 
;MOVE CURRENT 4 


PSW RG PSW TO R 
#147777 RG [CLEAR ALL BITS EXCEPT | 13: 12> 
RG “MOVE <13:12> BITS IN 
R4 [TO THE <15: 145 Posty 10N 
R2,R4 [SEE IF PREVIOUS MODE IS OK 
2$ ‘BRANCH AROUND ERROR CALL IF Ok 
MRO [TURN OFF MEMORY MANAGEMENT 
R2, $REG2 :STORE EXPECTED PREVIOUS MODE FOR PRINTOUT 
R4,$TMPG :STORE OBTAINED PREVIOUS MODE FOR PRINTOUT 
PC POPSTK :GO POP STACK 5 TIMES 
+43 [WRONG PREVIOUS MODE 
PC, PSHSTK ;GO RESTORE STACK 
MRO “TURN MEMORY MANAGEMENT BACK ON 
(SSP) +,R3 SRESTORE PRE-CSM PSW IN R3 
T+1 [DECREMENT LCNT+1 TO 4 
[SEE IF STACK POINTER VALUE WAS TRANSFERED 
AROUND ERROR CALL IF SO 


“BRANCH 
; TURN OFF MEMORY MANAGEMENT 
; STORE R5 FOR PRINTOUT 


+44 
000304 PC ,PSHSTK 3GO RESTORE STACK 
140574 MRO ; TURN MEMORY MANAGEMENT BACK ON 
: MOV (SSP)+,R1 ;POP ARGUMENT OFF OF STACK 
000217 ZDECREMENT LCNT+1 TO 3 
CMP ; COMPARE RO WITH THE ARGUMENT THAT WAS ON STACK 
BRANCH AROUND ERROR 


140556 
142142 
142 


+4 ° 
PC ,PSHSTK 3GO RESTORE STACK 
77 MEMORY MANAGEMENT BACK ON 
(SSP)+,R1 ;POP UPDATED PC PUSHED ON STACK 
1 SDECREMENT LCNT+1 TO 2 
7SEE IF UPDATED PC WAS CORRECT 
; ERROR IF OK 


H AROUND 
140510 MRO TURN OFF MEMORY MANAGEMENT 
036460 142116 STORE EXPECTED FOR PRINTOUT 
142070 R1,$REG1 STORE R1_ FOR PRINTOUT 
000130 :60 POP A eas 2 TIMES 


+46 
000170 J PC ,PSHSTK 360 RESTORE STACK 
00 140460 MMRO ; TURN MEMORY MANAGEMENT BACK ON 
3845 037112 012601 : (SSP) +,R1 ‘MOVE TEMP PUSHED INTO R1 
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3846 037114 032701 000017 #17,R1 SEE IF PSW <3:0> WERE CLEARED 
1427 CSMRET BRANCH AROUND ERROR CALL IF Ok 
140444 MRO MANAGEMENT 


; TURN OFF MEMORY 
142032 R1,$REG1 + STORE R1 FOR PRINTOUT 
000052 (SSP)+,TEMP+2  :POP STACK ONCE 
+47 ‘BITS <3:0> SET IN PSW 
000044 MO TEMP+2,-(SSP) ;RESTORE STACK ONCE 
BR CSMRET SBRANCH TO RETURN 
140420 : MRO : TURN OFF MEMORY MANAGEMENT 
000046 SRCALL .R1 [MOVE RETURN ADDRESS TO R1 
(R1)+,(R1)+ By to R1 BY 4 
000024 : (SSP)+, TEMP+2 :POP § STAC 
000020 TEMP+2,R1 sSEE IF POPPED NUMBER IS gee ADDRESS 
1$ ;BRANCH FOR ANOTHER POP IF NO 
+50 WRONG SUPERVISOR SPACE TRROR. 
000010 MO TEMP+2 ,-(SSP) SRESTORE STACK 
140366 : Cl MMRO : TURN OFF MEMORY MANAGEMENT 
PC SRETURN FROM THIS SUBROUTINE 


6 ;LOCATIONS TO STORE STACK CONTENTS 

0 ;LOOP_ COUNTER STORAGE 

0 [LOCATION FOR SUBROUTINE CALL ADDRESS 
0 ;POINTER 


177767 177764 : LCNT+1,LCNT s;MOVE UPPER BYTE a! VALUE TO LOWER BYTE 
SAVE RETURN PC OF THIS SUBROUTINE 
177756 é [MOVE ADDRESS OF 1ST STORAGE LOCATION TO POINTER 
: :POP STACK INTO LOCATION PNTR IS POINTING TO 
177744 TO THE POINTER 


2 
“DECREMENT THE LOOP COUNTER 
BN PPLOOP BRANCH BACK FOR ANOTHER LOOP IF NOT ZERO 
177712 RETURN: oe ccueers ta) a RETURN OF THIS SUBROUTINE BACK ON STACK 


3R 


177704 PSHSTK: (SSP)+, TEMP SAVE RETURN PC OF THIS SUBROUTINE 
000002 177716 PSLOOP: #2,PNTR ;SUBTRACT 2 FROM THE POINTE 
177712 @PNTR ,~ (SSP) [PUSH LOCATION PNTR IS POINTING TO ONTO STACK 
037210 177704 ATEMP+2 ,PNTR 7SEE IF LAST ITEM WAS PUSHED 
3884 BNE PSLOOP BRANCH BACK FOR ANOTHER LOOP IF NOT 
3885 037324 RETURN ZBRANCH TO STACK RESTORE AND RETURN 
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3887 - SBTTL END OF PASS ROUTINE 
eritiitiit tii itt itt iste 
7 *INCREMENT THE PASS NUMBER ($PASS) si 
z*TYPE "END PASS AXXXXX TOTAL NUMBER OF ERRORS SINCE LAST REPORT YYYYY 
WHERE XXXXX AND YYYYY “gs M ctcne NUMBERS 
:*1F SW12=1 INHIBIT TRACE T 
:*IF THERES A MONITOR GO 10 iT 
Pepa THERE ISN'T JUMP TO LOOP 


141546 STSTNM 33ZERO THE TEST NUMBER 

141672 $SPASS :¢ INCREMENT THE PASS NUMBER 

100000 #190000 , $PASS DON'T ALLOW A NEG. NUMBER 
peer ; LOOP? 


SDOAGN ssVEs 
sls Maree 7 RESTORE COUNTER 


037370 ri +3 TYPE ASCIZ STRING 
BR ey OVER THE ASCIZ 
21 5><15>/END PASS # 


016746 141620 $PASS ,- (SP) 7:SAVE SPASS FOR TYPEOUT 
73TYPE PASS NUMBER 
104405 ;;GO TYPE--DECIMAL ASCII WITH SIGN 
104401 037422 -67$ 33 STRING 
000421 66$ 
/ TOTAL ERRORS SINCE LAST REPORT 


016746 141422 SERTTL,~(SP) +7 SAVE SERTTL FOR TYPEOUT 
AL_NUMBER OF 


ERRORS 
7:GO TYPE--DECIMAL ASCII WITH SIGN 
001221 22 TYPE roy “7 peas LINE FEED 


141410 
000042 $GET42: 


-(SP) 
037520 #$CLR.T,-(SP) 
SRTRN 


RT 
3 DO AN RTI OR Cie ee We re 
WITH A CLEARED ''T’* BIT 


000042 * a#42,R0  s INSURE RO. CONTAINS THE MONITORS 
$DOAGN URN ADDRESS 


PC, (RO) 


;;PUSH OLD PSW AND PC ON STACK 
000020 #20, (SP) i:CLEAR THE *T'’ BIT 
010000 WB1T12,aSWR = RUN WITH TRACE TRAP? 
BNE 1$ F NO 
141526 $7817 ii1S IT TIME FOR TRACE TRAP 


100402 $ 
052716 000020 #20, (SP) 
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037570 012746 037576 1$: MOV #$LOOP ,-(SP) 37 JUMP TO START OF TEST 
037574 000002 SRTRN: RT] yA re IS CHANGED TO 
"RIT IF ‘RTT IS A LEGAL 
‘INSTRUCTION 


037576 SLOOP: 
JMP a(PC)+ 3 sRETURN 
SRTNAD: .WORD LOOP 
SENULL : «BS -1,-1,0 3=NULL CHARACTER STRING 


-EVE 
. SBTTL SCOPE HANDLER ROUTINE 
ek eee AREA AEE AAA AEE REET E TAHT RAE ER ERATE ERR ee 
; *THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 
7*AND LOAD THE TEST NUMBER(STSTNM) INTO THE DISPLAY REG. (DISPLAY<7:0>) 
7*AND LOAD THE ERROR FLAG (SERFLG) INTO pt get ing 08> 
; * THE SWITCH ee on test BY THIS ROUTINE AR 


LOOP ON ERROR 
LOOP ON TEST IN SWR<7:0> 


;:SCOPE=I0T 


037606 
37606 53 eo FOR CHANGE IN SOF T=SWR 


0 104410 SWR 
037610 032777 141322 3 #B1T14,aSWR ;LOOP ON PRESENT TEST? 
037616 001062 BNE SOVER YES IF SW14=1 
= OF CODE FOR THE XOR TESTERSAAAA 
000416 $XxTSTR: BR 6$ 7 1F RUNNING ON THE hy TESTER CHANGE 
Zi THIS INSTRUCTION TO A_‘NOP*’ (NOP=240) 
013746 000004 @#ERRVEC ,-(SP) SAVE THE Roi OF THE ERROR VECTOR 
RVEC 53 OR_TIMEOUT 


#5$,aHER 
avi77 
(SP) + ,a#ERRVEC 
BR $SVLAD T 
S$: (SP) +, (SP)+ S CLEAR THE STACK AFTER A TIME OUT 
(SP) +, a#ERRVEC 3 JRESTORE THE ERROR VECTOR 
7$ “LOOP ON THE PRESENT TEST 
CODE FOR THE XOR TESTERMAHHM 
141254 BIT 2 T08 ,aSWR wt ON SPEC. TEST? 
141206 OSuR»STSTNM 730N THE RIGHT TEST? — SWR<7:0> 
3 HAS AN ERROR OCCURRED? 
$SVL F NO 
141226 , : LOOP ON ERROR? 
141164 7$: SLPERR, SLPADR +:SET LOOP ADDRESS TO LAST SCOPE 
SERFLG ZERO THE ERROR FLAG 
TEST NUMBE 


$TSTNM 
STSTNM,STESTN i267 TEST NUMBER IN APT MAILBOX 
(SP) , $LPADR SAVE SCOPE LOOP ADDRESS 


(SP); $LPERR 3SA RESS 
$ESCAPE :sCLEAR THE ESCAPE FROM ERROR ADDRESS 
MO #1 , SERMAX ZONLY ALLOW ONE(1) ERROR ON NEXT TEST 
SOVER: $TSTNM,@DISPLAY : DISPLAY TEST NUMBER 
MO SLPADR, (SP) A pe os ADDRESS 


5 a et ah 
ONOW 


IS 
rrr re) 


See 


RTI 
-SBTTL ERROR HANDLER ROUTINE 
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122767 
001007 
116767 
004767 


1402 
016716 
022737 
001001 


ad and od od ed ed 
SERV 
NEMS OONWS 


S SR RRRRRRER 
os 
wW 


= 
aS 


4 
6 
6 
2 


: 


140700 
140776 


140770 
037530 


F 
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FARRAR AAAAAEAA AREER E AEE EEEREEREREAEEEERARERRERERARRRARRAEREAREEER 


SRTHIS ROUTINE WILL_INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
; *SAVE acre = NUMBER AND THE ADDRESS OF THE ERROR CALL 


O ERRTY 


*AND GO T P ON ERROR 
‘ * THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 
;*SW15=17 HALT ON ERROR 
INHIBIT ie Enc TYPEOUTS 


BELL ON 


LOOP ON ERROR 


;;ERROR=EMT AND N=ERROR ITEM NUMBER 


R5,$REGS 
$TSTNM, TESTNO 


SERFLG 
7$ 


STSTNM,@DISPLAY 
aSWR 


#B1T10, 
1$ 


20 
PC,ERRTYP 
-SCRLF 


MAPTENV, SENV 


$ITEMB,21$ 
ata 


0 


22$ 
aSwR 
3$ 


“=! T09,,aSwWR 
SLPERR, (SP) 
SESCAPE 

5$ 

SESCAPE , (SP) 
#SENDAD ,a#42 
6$ 


3; TEST FOR CHANGE IN SOFT=SWR 
;SAVE THE CONTENTS OF RO 


CONTENTS OF R5 
TEST NUMBER 


;;SET THE ERROR FLAG 
DON'T LET THE FLAG GO TO ZERO 
3 DISPLAY TEST NUMBER AND ERROR FLAG 
L ON ERROR? 
3:NO - SKIP 
: ¢RING BELL 


T THE NUMBER OF ERRORS 
7:GET ADDRESS OF ERROR INSTRUCTION 


7zSTRIP AND SAVE THE ERROR ITEM CODE 
73SKIP TYPEOUT IF SET 
73SKIP_TYPEOUTS 

3:GO TO USER ERROR ROUTINE 


RUNNING IN APT MODE 
INO, SKIP APT —s REPORT 
7:SET ITEM NUMBER AS ERROR NUMBER 
3 ¢REPORT FATAL ERROR TO APT 


* FUDGE RETURN FOR LOOPING 
: CHECK FOR AN ESCAPE ADDRESS 


>ZFUDGE RETURN ADDRESS FOR ESCAPE 
3zACT~11 AUTO-ACCEPT? 


; BRANCH IF NO 
7 7YES 
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040234 7 RETURN 


3890 

3891 040236 ERRTYP: -$CRLF "CARRIAGE RETURN’’ @ ‘LINE FEED"’ 
MOV RO,-(KSP) ;SAVE RO. 

;PICKUP THE ITEM INDEX 


71F_ITEM NUMBER IS ZERO, JUST 
TYPE THE PC OF THE ERROR 
SERRPC ,=(SP) 77SAVE SERRPC FOR TYPEOUT 
te ADDRESS 
2560 las ASCII(ALL DIGITS) 


SADJUST THE INDEX SO THAT IT WILL 
;WORK FOR THE ERROR TABLE. 


R 
a4$1TEMB,RO 
1$ 


RO 
#SERRTB RO :FORM TABLE POINTER 
(RO) +,26 :PICKUP ‘ERROR MESSAGE’ POINTER 
3$ :SKIP TYPEOUT IF NO POINTER 
ZTYPE THE ‘ERROR MESSAGE’ 
2s: WORD 0 ;" ERROR MESSAGE’’ POINTER GOES HERE 
»SCRLF ;CARRIAGE RETURN'’ & ‘LINE FEED 
38: (RO)+ 48 ZPICKUP ‘DATA HEADER’ POINTER 


a . 


4$: HERE 
,SCRLF IAGE RETURN’’ H "LINE FEED’’ 
5$: R1,-(KSP) ‘gh E R1 
(RO)+,R1 te *DATA TABLE’ oh 
12$ 7BR IF NO DATA TO BE TYPED 
MOV = RO ;PICKUP ‘DATA FORMAT’’ POINTER 
6$: (RO) ils IT FORMAT 0? 


BNE 7$ IF NO 
3922 z*THIS CODE IS FOR OCTAL 6-BITS er FORMAT (DF=0) 

3923 040350 013146 MOV a(R1)+,=-(SP) :7SAVE @(R1)* FPR TYPEQUT 

3904 040352 104402 TYPOC 7:GO TYPE=-OCTAL ASCII(ALL DIGITS) 


000456 BR 11$ 
3926 >*THIS CODE IS FOR DECIMAL FORMAT (DF=1) 
3927 040356 121027 7$: CMPB <0) 4 #) :1S IT FORMAT 1? 


3928 040362 BNE 8 “BRANCH IF NO 
3929 040364 MOV a(R1)+,-(SP) 3 SAVE a(R1)+ FOR TYPEOUT 
TYPDS 37GO TYPE--DECIMAL ASCII WITH SIGN 


3930 040366 

3931 040370 BR 11$ 

3932 :*THIS CODE IS FOR BINARY FORMAT (DF=2) 

3933 040372 8s: CMPB —s-_- (RO) ,#2 z1S IT FORMAT 2 
3934 040376 001003 BNE 


;BRANCH IF NO 
MOV a(R1)}+,-(SP) :: SAVE a(R1)+ FOR TYPEOUT 
TYPBN ;;GO TYPE--BINARY ASCII 


BR 11$ 
-*THIS CODE IS FOR OCTAL (22-BIT) FORMAT (DF=3) 
5s: CMB (RO) #3 t1S IT FORMAT 3? 


BRANCH IF NO 
(R1)+,-(KSP) PUT ADDRESS OF FIRST LOC. ON STACK 
PC,$DB20 ;CONVERT TWO LOCS. TO AN une ad STRING 
#3, (KSP) SONLY NEED 8 CHARACTERS NOT 11 
MOV (KSP)+,10$ [PUT ADDRESS OF ASCII CHARS. AT 108 
3945 040432 iTYPE OCTAL VALUE OF 22-BIT BINARY NO. 
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10$: -WORD 0 
:*THIS CODE IS 2 be ® (22-B1T) FORMAT FOR A PAR LEFT SHIFTED 6 (DF=4) 
MOV KSP) :SAVE R ACK 


15$: 
. eR) 
acR1)+, R3 
R2 


#6,R2 
R2,STMP4 
R3,STMP5 :HOLD OF ADDRESS 
#STMP4 -(KSP)  ;PUT ADDR LOWER BITS ONTO STACK 
PC,$D08 ;CONVERT TWO LOCS. TO “y ASCII STRING 
#3, (KSP) ZONLY NEED 8 CHARACTERS NOT 11 
(KSP)+,16$ ;PUT ADDRESS OF ASCII CHARS. AT 16$ 
;TYPE OCTAL VALUE OF 22-BIT BINARY NO. 


0 
(KSP)+,R3 ;RESTORE R3 
(KSP)+,R2 sRESTORE R2 
1) i1S ge | ANOTHER NUMBER? 


:BR 
s TYPE TWO(2) SPACES 
[POINT TO NEW ‘DATA FORMAT"’ 


6$ ; LOOP 

(KSP)+,R1 SRESTORE R1 

(KSP)+,RO RESTORE RO 

a. LF z''CARRIAGE RETURN’' & ‘LINE FEED"’ 


[RE TURN 
:TWO(2) SPACES 
“BYTE 0 
-SBTTL TTY INPUT ROUTINE 


s3 (PARR RSSSSSEE SESE SERRE RE RR RRA ASE ESSER RRR ERR SRR RRR RRR SRSA ARR DDS 


-ENABL LSB 
Weritiiiittiiiiiiitit iii iii rrr is) 
*SOFTWARE SWITCH REGISTER CHANGE ROUTINE. 
;*ROUTINE IS ENTERED FROM THE TRAP HANDLER, WILL 
>*SERVICE THE TEST FOR CHANGE IN SOFTWARE Swi TCH REGISTER TRAP CALL 
gsWHEN _OPERAT ING IN TTY FLAG MODE. 

022767 000176 $CKSWR: CMP MSWREG , SWR 22 THE SOFT-SWR SELECTED? 

001114 15$ CH IF NO 


"BNE 5 

140364 a$iks 
140360 MOVB  a$TKB,-(SP) 
177600 #°C177, (SP) 
000007 MP "” (SP5+ 
140330 SAUTOB 41 
041501 T ,SCNTLG 
041506 : SSMSWR 
137352 MOV SWREG, -(SP) 
041517 / SMNEW 

: =(SP) 

CL -(SP) 

140302 : asTks 


BP 7$ :3 
140276 a$TKB,-(SP) ::PICK UP CHAR 
177600 rte (SP) **MAKE IT 7=BIT ASCII 
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(SP) #3 ei IT A CONTROL=-C? 
9$ ;BRANCH IF NOT 
-SCNTLC i3YES, ECHO CONTROL=C (“*C) 
#6,S LEAN UP STACK 
SINTAG,41 ; SRE NABLE TTY KEYBOARD INTERRUPTS? 
$ ;BRANCH IF NO 
i FALL OW TTY ds pe INTERRUPTS 
ONTROL=C RESTAR 
3218 ITA CONTROL AU? 
; ;BRANCH IF NOT 
i3YES, ECHO CONTROL-U (“U) 
— PREVIOUS INPUT 
SzLET’ S TRY IT AGAIN 
2271S IT A <CR>? 
; BRANCH IF NO 
szYES, IS IT THE FIRST CHAR? 
3 H IF YES 
140162 


000006 
001221 : $CRLF : 
140143 000001 Coe SINTAG,#1 : : RE~ENABL y KBD INTERRUPTS? 


NOT 
140140 #100 ,a$TKS 33 oo TTY KBD INTERRUPTS 
PC ,STYPEC 
(SP) ,#60 


aad 
an 


F YES 


oooooo 
RS 


38 CH IF YES 
2: STRIP-OFF ASCII 
:IS a ta CHAR 


SHIFT PRESENT 
“CHAR OVER TO MAKE 
W ONE. 


Wh 
mo 


17$: 2(SP) 
-2(SP), (SP) 
7$ :3G 
18$: SQUES si TYPE 2?<CR><LF> 
BR 30$ +>SIMULATE CONTROL-U 
-DSABL LSB 


LARA EERE EERE EEE REE AEE RARER ERE RERAEE EKER ERE REED 


[*THIS ROUTINE WILL INPUT A SINGLE CHARACTER FROM THE TTY 


*CALL: 


ie RDCHR :: INPUT A SINGLE CHARACTER FROM THE TTY 
** 


041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 


RERIEREES 


RETURN HERE 3; CHARACTER IS ON THE STACK 
;* szWITH PARITY BIT STRIPPED OFF 


SRDCHR: (SP) ,-(SP) :PUSH DOWN THE PC 
MO 4(SP) ,2(SP) £3 SAVE THE PS 
1$: asTks FOR 


WAT NARACTER 
a$TkB,4(SP) ‘TREAD THE TTY 
#°C(<177>,4(SP) :2GET RID OF JUNK IF ANY 
4 (SP) #28 :1S IT A CONTROL~S? 


BNE CH IF NO 
105777 : asTKs StWAIT FOR A CHARACTER 


RSSLF 


RRRRRRRRE 
ett ee 
N 


SRS 
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2$ 
a$TkB,-(SP) 
Oates. (ep) 
(SP)+,#21 
2$ 


1$ 
4(SP) ,#140 
oe H IF YES 
set ae 2218 oe at CHAR? 
#40 ,4(SP) 


ee 
2 AREER AEEEEAEAEAAEEREAAAEERAEARERAEAARRERKEKARRAREREKREKEKEKEE 


:STHIS ROUTINE WILL INPUT A STRING FROM THE TTY 


2 *CAL 
:* RDLIN : INPUT A STRING FROM THE TTY 
* RETURN HERE ADDRESS OF FIRST CHARACTER WILL BE ON THE STACK 
. +: TERMINATOR WILL BE A BYTE OF ALL O'S 
$RDLIN: R3,-(SP) ::SAVE R3 
C -(§P) *:CLEAR THE RUBOUT KEY 
1$: #STTYIN,R3 +:GET ADDRESS 
2$: #STTYING. .R3  S BUF F 


SRERSENSASE 


RRRRRRRRRKEKRK 
o 


—  t S  S Y SY 


8 


NMoNMNMNNNP 
Nae 
SNANO 


CHARACTER FROM THE TTY 
VB (SP) +, (R3) : ER 
000003 #3, (R3) t:1S IT A CONTROL-C? 
BNE 0$ 


1 ; ;BRANCH IF NO 
001312 zz TYPE A CONTROL-C (“C) 
(SP) ::CLEAN RUBOUT KEY OFF OF THE STACK 
: ;RESTORE R3 
000256 CNTRLC ::GOTO CONTROL-C RESTART 
000177 : a a zsis iy A RUBOUT 


;2BR IF NO 
(SP) 3z1S THIS THE FIRST RUBOUT? 
BNE 6$ 7;BR IF NO 

000134 a'\,9 77 TYPE A BACK SLASH 

041462 P 

177777 MOV ae , (SP) 


041464 : R3,4STTYIN 


000144 MOVB (R3) , 9 
041462 9$ 


mon 
oO 

LSSs8n=5 

MARKS 


82820805 
NOM 


—s 
nN R 
e83ss 


SANRRSSNS RAS ES 
gsgx 


22288 


2$ 
(SP) 
7$ as IF NO 
000134 MOVB = 77 TYPE A BACK SLASH 


1 
041462 ‘ 
(SP) 7:CLEAR THE RUBOUT KEY 
000025 : #25, (R3) 3271S CHARACTER A CTRL U? 


BNE F NO 
041474 - SCNTLU 
000022 : #22,(R3) 

BNE 3$ 


CLRB (R3) 
001221 , $CRLF 


aus 


BYSES 


041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 


RSS 
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INE SEQ 0101 


041464 $TTYIN :;TYPE THE INPUT STRING 
as :}G0 PICKUP ANOTHER CHACTER 


BR 
001220 : $QUES +: : 
BR i$ [CLEAR THE BUFFER AND LOOP 
(R3) ,9$ S:ECHO THE CHARACTER 


#15, (R3)+ ::CHECK FOR RETURN 
>;LOOP IF NOT RET 


ROR 


000046 
041462 
000015 


177777 
001222 


SERRE KES 
EVRRS 


D 
3;CLEAN RUBOUT KEY FROM THE STACK 
7ZRESTORE R3 
;;ADJUST THE STACK AND PUT ADDRESS OF THE 
$3 FIRST ASCII CHARACTER ON IT 


RE 
NS 


4(SP5 ,2(SP) 
#STTYIN,4(SP) 


7 RETURN 

9$: 0 7; STORAGE FOR ASCII CHAR. TO TYPE 
0 3 TERMINATOR 

STTYIN: .BLKB 8. 7 RESERVE 8 BYTES FOR TTY INPUT 

SCNTLU: . /*U/<15><12> : CONTROL ‘U'’ 

SCNTLG: /*G/<15><12> 7z CONTROL ‘'G’’ 


SMSWR: . <15><12>/SWR = / 


YSRERES 
88 


SSeS Sow ou 
NOSNM 


oO 
= 4 


SMNEW: .ASCIZ / NEW = / 


4 
4 
5 
5 
5 
5 
5 
5 
5 
5 


UNVNRSKR 


-SBTTL CONTROL=C SERVICING ROUTINE 


137476 CNTRLC: $SPASS ,STMPS 3GET THE VALUE OF ‘‘$PASS** 
137446 $STMPS FORM CURRENT PASS # 
041607 .CMSG ; TYPE THE TEST STOPS HERE 
137330 $TS 

000022 1 


tee 


TSTNM,1$ SAVE TEST NUMBER 
$,-(SP) SAVE 1$ FO TYPEOUT 


SREXEE 


041604 2$ 

137416 $TMPS ,-(SP) :SAVE $STMP5 FOR TYPEOUT 
:TYPE ASCII DECIMAL WITH SIGN 
SASK FOR NEW SWR VALUE 

175526 MP SEOP+2 ‘JUMP TO END OF PASS + 2 

1$: WORD 0 ‘TEST # BUFFER 
2$: a +2 SPACES & STOP MESSAGE 
CMSG: .ASCII /JUMPING TO END OF PASS/<15><12> 


ay 
MOOKBNM 
R — 
oa 
N 


— 
SRROSVSANLSNS 
R 
=) 


BPSLELSSESESS 
RRRRRRRRRRRKRKRKKRRKRRRRRRRER 
= 


RaeReay 
WOVIlNn 
oo-wu 
jb 
on== 


N 
Oo 


ARRON 
pape 


LN 


/TESTNO PASSNO/<15><12> 


ns ss ss Ss) — -- 22 ss Ss SS SS ss SS ss ss 


oO 

vw 

Oumnn 

-O Rm SS St 
a PUBS 
_—— = 2 Oo — 
—O—N— NM 
A-NWNIWOOUE AWN 
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041653 
041656 
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CONTROL=C SERVICING ROUTINE 


3994 041657 000 
3995 


MACRO M1113 O5-DEC-79 14:41 


-BYTE 0 

- SBTTL TYPE ROUTINE 

erriiiiiiiiiti iti 

:*ROUTINE TO TYPE ASCIZ MESSAGE. 7 a ae. MUST TERMINATE WITH A O BYTE. 

; * THE ROUTINE WILL INSERT A NUMBER OF NULL CHARACTERS AFTER A LINE FEED. 

;*NOTE1: SNULL CONTAINS THE CHARACTER 9 BE USED AS THE FILLER CHARACTER. 
SFILLS CONTAINS THE NUMBER OF FILLER CHARACTERS REQUIRED. 
SFILLC CONTAINS THE CHARACTER TO FILL AFTER. 


SSRIS 


NN 
—_— 
ao 


041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 
041 


SASINSERASHSRS 


S8x8 


oso el 

oS R ine] 

Mm BRU N — P— 
Oo 


_ 
RES 
AO 
N 
vw 
SoQanvuin=-— 


sss 38 
meu 

o 

N 


_ 
SS 
Sy 
SN 


137273 


000002 
000001 


000100 


000004 
000270 
000040 


000200 


000056 
137136 
137126 
000001 


000032 
000142 


137336 
137327 


137305 


:*CALL: 
i+) USING A TRAP INSTRUCTION 
TYPE § ,MESADR 


;0R 


* 


1$: 


* 
$TYPE: 


STPFLG 
1$ 


PC, SATY3 


#APTCSUP , SENVM 
0$ 


(RO) +,-(SP) 
4$ 

(SP) + 
(SP)+,RO 
#2, (SP) 
MHT , (SP) 
ACRLF , (SP) 
5$ 


(SP)+ 


SCHARCNT 
2s 


PC ,STYPEC 
SFILLC,(SP)+ 


$NULL , ~ (SP) 
1(SP) 

6$ 
PC,$TYPEC 
SCHARCNT 


BR $ 
HORIZONTAL TAB PROCESSOR 


3;MESADR IS FIRST ADDRESS OF AN ASCIZ STRING 


31S THERE A TERMINAL? 
ae F YES 


7 ges IF NO TERMINAL 


oe VE RO 

33GET ADDRESS OF ASCIZ STRING 

7 RUNNING IN APT MODE 

ays GO CHECK FOR APT CONSOLE 
MESSAGE TO APT 


73NO,GO CHECK FOR CONSOLE 
33 SETUP ME SSAGE oe FOR APT 
MESSAGE TO APT 


: sMESSAGE ADDRESS. 
33APT SKIP TYPE OUT 


HIF TERMINATOR POP iT OF F THE STACK 
7 RESTORE RO 
yoy RETURN PC 


+ SBRANCH IF <HT> 
BRANCH IF NOT <CRLF> 


7:POP_ <CR><LF> equiv 
7:TYPE A CR AND L 


3;CLEAR CHARACTER COUNT 
23GET NEXT CHARACTER 
:GO TYPE THIS CHARACTER 
331S IT TIME FOR FILLER CHARS.? 
GET NEXT CHAR, 
F FILLER CHARS. NEEDED 
NULL CHAR. 
LL NEED TO BE TYPED? 
POP THE NULL OFF OF STACK 





N 
ae, Te MEM MGMT PRT B MACRO M1113 OS-DEC-79 14:41 PAGE hel 


112716 000040 8s: MOVB (SP) ; :REPLACE TAB WITH SPACE 
767 000014 : rc. /STYPEC A SPACE 

000007 SCHARCNT ; ;BRANCH IF NOT AT 

9$° 37 TAB STOP 

(SP) + ; sPOP SPACE OFF STACK 

2$ :GET NEXT CHARACTER 

asTPs tIWAIT UNTIL PRINTER IS READY 


STYPEC 
2(SP) ,aSTPB 2 sLOAD CHAR TO BE Sg 5 INTO DATA REG. 
a$Tks | i ALKING 


sa ow 
a tat 
— - a 


137052 


oe 


2$ 
a$TKB,-(SP) ¢ PACT 0 STACK. 
#177600 (SP) :IBIT CLEAR TOP BYTE No PARITY BIT. 
3, (SP5+ :3SEE IF THIS IS A 
SBRANCH TO CONTINUES if IT ISN'T. 
S:WAIT FOR ANOTHER I 
; BRANCH BACK IF NOT READY. 
[PUSH NEXT CHARACTER ON STACK. 
t:BIT CLEAR TOP BYTE No PARITY BIT. 


2 3SEE 4 THIS is 
H BACK FoR more WAIT IF NOT. 
ie. -2(SP) 3215 CHARACTER A CARRIAGE RETURN? 


; ;BRANCH IF NO 
oe 13 YES==CLEAR CHARACTER COUNT 


$TY 3 EX 
rhe wets?) 3731S CHARACTER A LINE FEED? 
$TYPE : {BRANCH IF YES 
POs ;COUNT THE CHARACTER 

7; CHARACTER COUNT STORAGE 


2 S PC 
- SBTTL APT COMMUNICATIONS ROUTINE 
[RARER AREA ERE REE EEE EEA EERE EAEEEEREEREEREREEEEEKERKEE 
#1,SFFLG 37TO REPORT FATAL ERROR 
#1 + tae 32zTO TYPE A MESSAGE 


SATY 
#1 ISFFLG TO ONLY REPORT FATAL ERROR 


RO,-(SP) 7 PUSH RO ON STACK 
R1,-(SP) 77PUSH R1 ON STACK 
SMFLG 3 ae TYPE A MESSAGE? 


5$ eo bd 

WAPTENV,SENV — ;OPERATING UNDER APT? 

$ [IF NOT: BR 

#APTSPOOL , SENVM 2 SHOULD SPOOL MESSAGES? 

3$ ::1F NOT: BR 

a4 (SP) ,RO S3GET MESSAGE ADDR. 

#2,4(SP) ETURN ADDR. 
$MSGTYPE ::SEE IF “BONE W/ LAST XMISSION? 


1$ 
RO, $MSGAD ::PUT ADDR IN MAILBOX 
(RO) + FIND END OF MESSAGE 


2$ 
$SMSGAD ,RO 23 SUB START OF MESSAGE 


RO 
RO, $MSGLGT ; 
£5 STWR 7zTELL APT TO TAKE MSG. 


: mee 
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3998 


017667 000004 
062766 000002 
016746 135414 
004767 177272 
105767 000062 
001416 
005767 136642 
001413 
005767 136614 
001375 
017667 

766 2 
005267 136572 
105067 000020 
05067 000013 
105067 
012601 

12600 

207 

000 

000 

000 
000200 
000001 
000100 
010146 
016601 000006 
000261 
112767 000060 
006101 
0014 
105567 
104401 042532 
000241 
00076 
012601 

1 000002 
012616 

000 000 
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000016 
000004 


136606 


000034 


3$: 


a4(SP) ,4¢ 


B 9 
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;-PUT MSG ADDR ier JSR LINKAGE 


D #2,4(SP) TURN ADDRESS 
MOV 177776, =(SP) PUSH 199776 ON STACK 
JSR »STYPE *:CALL TYPE MACRO 
$i WORD 
10$: TSTB ss SFFLG ::SHOULD REPORT FATAL ERROR? 
BEQ 12$ ::1F NOT: BR 
TST SENV ; PRUNING UNDER APT? 
BEQ 12$ :1F NOT: BR 
11$: TST $MSGTYPE 3 3F INISHED LAST MESSAGE? 
BNE 11$ :31F NOT: WAIT 
MOV a4 (SP) ,SFATAL T ERROR 4a 
ADD #2,4(SP) ;BUMP RETURN ADDR. 
INC $MSGTYPE 7: TELL aT TO TAKE ERROR 
12$: CLRB  ~—s- SFFLLG 7:CLEAR FATAL FLAG 
CLRB = SLFLG 7: CLEAR LOG FLAG 
CLRB = SMFLLG ::CLEAR MESSAGE FLAG 
MOV (SP)+,R1 +:POP STACK INTO R1 
MOV (SP)+,RO ::POP STACK INTO RO 
RTS PC  ; RETURN 
SMFLG: .BYTE O :MESSG. FLAG 
$LFLG: .BYTE 0 ::LOG FLAG 
SFFLG: g 44 0 s FATAL FLAG 
APTSIZE=300°. 
APTENV=001 
APTSPOOL=100 
APTCSUP=040 


-SBTTL BINARY TO ASCII AND TYPE ROUTINE 


J RARER ERE EEE EEE REE EER EERE EK 


z*THIS ROUTINE IS USED TO CHANGE A 16-BIT BINARY NUMBER TO A 16-81T 


; *BINARY~ASCII NUMBER AND TYPE IT. 


7 *CALL 
i MOV NUMBER,-(SP) —; ;NUMBER TO BE TYPED 
zs TYPBN :TYPE IT 
$TYPBN: MOV —-R1,~( SP) ; SAVE | RI ON THE STACK 
Mov = 6 (SP) ,R1 :3GET THE INPUT NUMBER 
SEC SET “C80 CAN KEEP TRACK OF THE NUMBER OF BITS 
1$: MO #'0,$BIN ESET CHARACTER TO AN ASCII "O". 
ROL RI :3GET_THIS BIT 
ADCB  —-$BIN :ENO=SET THE CHARACTER EQUAL TO THIS BIT 
TYPE , SBIN ::G0_TYPE THIS BIT 
CLC LEAR “C"" SO CAN KEEP TRACK OF BITS 
BR 1$ 7:60 DO THE NEXT BIT 
2$: MOV (SP)+,R1 :POP THE STACK INTO R1 
MOV 2(SP).4(SP) ADJUST THE STACK 
Mov (SP) +, (SP) 
RTI ; RETURN TO USER 
$BIN: .BYTE 0,0 TORAGE FOR ASCIi CHAR. AND TERMINATOR 


0, 
- SBTTL BINARY TO OCTAL (ASCII) AND TYPE 


MASSSSA£2££ 225 SSF SSE ESASES ESAS ASE RSA ASRS ASRS SAAR SSAA RA RAR EDS OI 


[*THIS ROUTINE IS USED TO one A 16-BIT BINARY NUMBER TO A 6-DIGIT 
; *OCTAL (ASCI1) NUMBER _AND TYPE IT 
;*$T PU ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS TO TYPE 


*CALL 


SEQ 0105 


Cc 9 
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BINARY TO OCTAL (ASCII) AND TYPE ; SEQ 0106 


NUM ,=(SP) 


OR 0 
321=TYPE LEADING ZEROS 
3 0=SUPPRESS LEADING ZEROS 


: «$TYPON---ENTER HERE TO TYPE OUT WITH THE SAME PARAMETERS AS THE LAST 
beta OR $TYPOC 


MOV NUM , = (SP) 7 NUMBER TO BE TYPED 
TYPON 7sCALL FOR TYPEOUT 


** 

; #$TYPOC~--ENTER HERE FOR TYPEOUT OF A 16 BIT NUMBER 

‘ m NUM, = (SP) : NUMBER TO BE TYPED 

** . 

$TYPOS: MOV a(SP) ,-(SP) 
MO 


> *CAL 


33 THE MODE 
sel LOAD ae FILL SWITCH 

R OF DIGITS TO TYPE 
7ZADJUST RETURN ADDRESS 


SET THE ZERO FILL SWITCH 


£3561 FOR SIX(6) DIGITS 
4 ITERATION COUNT 


E RS 

SIGET THE NUMBER OF DIGITS TO TYPE 
7;SUBTRACT IT FOR MAX. ALLOWED 
3;SAVE_IT FOR USE 
4h} THE ZERO FILL SWITCH 

PICKUP _THE INPUT A 
ZICLEAR THE OUTPUT 
;;ROTATE MSB INTO i 


$3 0 MSB 
77FORM THIS DIGIT 


t OL ; ¢GET LSB OF THIS DIGIT 
000076 3 SOMOD : TYPE THIS DIGIT? 


7$ :IBR IF NO 
177770 , GET RID OF JUNK 
BN’ 4$ 7: TEST FOR O 
Po ere THIS 0? 
S_ANYMORE 0'S 
ott e .. NOT ALREADY 
3 SMe 


YPING 
:GO Tyee THIS DIGIT 


37BR IF DONE 
3: INSURE LAST DIGIT ISN'T A BLANK 
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BINARY TO OCTAL (ASCII) AND TYPE 


000744 
012605 


MACRO M1113 O5=DEC-79 14:41 


6$: 


0. 9 
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3:GO DO THE LAST DIGIT 
7;RESTORE R5 


; sRETURN 

;STORAGE FOR ASCII DIGIT 

;; TERMINATOR FOR TYPE ROUTINE 
;;O0CTAL DIGIT COUNTER 

73ZERO FILL SWITCH 

3 NUMBER OF DIGITS TO TYPE 


SEQ 0107 
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PR 
CONVERT BINARY TO DECIMAL 
4000 


8 
AND TYPE ROUTINE 
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- SBTTL CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 

CER EEAEEEEEKEEEEEEEEEERERAEEREEEEEERRAEEEAERAEKEREEREEEREEREEEKKEE 
TATHIS ROUTINE IS USED TO CHANGE A 16-B1T BINARY NUMBER TO A 5-DIGIT 

i ¥S1GNED DECIMAL (ASCII) NUMBER AND TYPE IT. DEPENDING ON WHETHER THE 
3m R IS POSITIVE OR NEGATIVE A SPACE OR A MINUS SIGN WILL BE TYPED 
;*BEFORE THE FIRST DIGIT OF THE NUMBER. LEADING ZEROS WILL ALWAYS BE 
;*REPLACED WITH SPACES. 


:*CALL: 


-* 


“* ad 
$TYPDS: 


177777 


177777 +=177776 


NUM , = (SP) 33;PUT_THE BINARY NUMBER ON THE STACK 


3:GO TO THE ROUTINE 


RO,-(SP) PUSH RO ON STACK 


R1,-(SP) 
R2.-(SP) 
R3.-(SP) 
R5,-(SP) 
#20200,-(SP) 
20(SP) RS 


R5 
#'=,1(SP) 


R 
#SDBLK ,R3 
#’ ,(R3)+ 


R 
$DTBL(RO),R1 
R1,R5 


73SET THE FIRST CHARACTER TO A BLANK 
7:CLEAR THE BCD NUMBER 
3;GET THE CONSTANT 
7 FORM THIS BCD DIGIT 
DONE 


; IF 
7: INCREASE THE BCD DIGIT BY 1 


;ADD BACK THE CONSTANT 
#3 CHECK IF BCD DIGIT=0 


HROUGH IF 0 
‘BR IF sou LEADING 0'S? 


44 IF NO 
+: YES=-SET THE SIGN 
— THE BCD DIGIT ASCII 


A+ IT A_SPACE_IF NOT ALREADY A DIG 
T_ THIS CHARACTER IN THE OUTPUT BUF 


6$ 
1(SP) ,=1(R3) 
#°0,R2 

»R2 


ee 
es 


IT 
FER 


t $0 
0 TO ASCII 
3 TWAS oy Hee THE FIRST NON-ZERO? 
7: YES--SET_THE a Aue TYPING 


9$ 
-1(SP) ,-2(R3) 
(R3) 


(SP)+,R5 
(SP)+,R3 
(SP)+,R2 
(SP)+,R1 
(SP)+,RO ; 

, SDBLK ; NOW TYPE THE NUMBER 


3:POP STACK INTO R2 
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CONVERT BINARY TO DECIMAL AND TYPE ROUTINE 


000002 000004 : ;;ADJUST THE STACK 
7 RETURN TO USER 


aenpenee 
SSNS RP 


SDBLK: .BLKW 4 
“SBITL SAVE AND RESTORE RO-RS ROUTINES 


eta Mae sik aris acer torah ee ean Lemna 


* sav VREG 
“UPON RETURN FROM $SSAVREG THE STACK WILL LOOK LIKE: 


: sTOP===(+16) 
;% +2---(+18) 


RO,-(SP) 33 RO ON STACK 
33 R1 ON STACK 
R2 ON STACK 


OF MAIN FLOW 
OF MAIN FLOW 


22(SP) .=(SP) 
RTI 
;*RESTORE RO-R5 


7 *CALL 
** 
$RESREG: 
MO (SP) +,22(SP) ::RESTORE PC OF CALL 
;RESTORE PS OF CALL 
ORE PC OF MAIN FLOW 
* RESTORE PS OF MAIN FLOW 
: INTO R5 


ay (SP) +;RO ‘POP STACK INTO RO 
-SBTTL DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTINE 


LEAR AEE EAA eee 
7*THIS ROUTINE WILL CONVERT A 32-BIT UNSIGNED BINARY NUMBER TO AN 
°F ed OCTAL ASCIZ NUMBER. 

i 


MOV #PNTR,-(SP) ::POINTER TO LOW WORD OF BINARY NUMBER 
JSR PC, a#$DB20 *=CALL THE ROUTINE 
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DOUBLE LENGTH BINARY TO OCTAL ASCII CONVERT ROUTI 


$0820: 


— 
g 
—" 
Ww 


000002 
043421 
000014 
177770 


scssssse 
ath and ad aad aod eal 


SOCTVL: 


BR 
-BLKB 


2(SP) ,R1 
#SOCTVL+13.,R5 
#12. ,R4 


| aaa RI 
R2,-(R5) 
RO,R2 


3$ 
2$ 


R5 
R5,2(SP) 


SEQ Olid 


37 THE ADDRESS OF THE FIRST ASCIZ CHAR. IS ON THE STACK 


77SAVE ALL REGISTERS 

;zPICKUP THE POINTER TO LOW WORD 
;zPOINTER TO DATA TABLE 

37D0 ELEVEN CHARACTERS 


; <BR IGIT 
i FALL DIGITS DONE-ADJUST POINTER FOR FIRST 
SCIZ_ CHAR. & PUT IT ON THE STACK 

: RESTORE ont REGISTERS 
7 RET URN TO USER 

;POSITION THE MASK FOR THE LAST DIGIT 
POSITION THE BINARY NUMBER FOR 
ae THE NEXT OCTAL DIGIT 


;zMASK OUT ALL JUNK 
: MAKE THIS CHAR. ASCII 

;GO PUT IT IN THE DATA TABLE 
TIRESERVE DATA TABLE 
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TRAP DECODER SEQ 0111 


4004 » SBTTL TRAP DECODER 
TTI IIIT LLL c titi iii iii iii iii iii) 
SS THIS ee WILL PICKUP THE LOWER BYTE OF THE ‘“‘TRAP’’ INSTRUCTION 
:*AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR THE STARTING ADDRESS 
60 THE ee ota 1" Shama THEN USING THE ADDRESS OBTAINED IT WILL 


:SAVE RO 
GET TRAP ADDRESS 
: ;BACKUP BY 2 
33GET RIGHT BYTE OF TRAP 
SL RO [POSITION FOR INDEXING 
Moy STRPAD(RO) ,RO 33 INDEX TO TABLE 
R O TO ROUTINE 
THIS Is "Sse TO HANDLE THE “GETPRI * MACRO 
$iRAP2: MOV (SP) ,=(SP) ::MOVE THE PC DOWN 
MOV 4(SP5 ,2(SP) : MOVE THE PSW DOWN 
RTI ZRESTORE THE PSW 
.SBTTL TRAP 


TABLE 
z*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALLED 
7*BY THE Pl INSTRUCTION. 


KEEEEE 
KEQSRY 


é 


$TRPAD: .WORD 
$ TRAP +1 (104401) TTY TYPEOUT ROUTINE 
TYPE OCTAL NUMBER (WITH LEADING ZEROS) 
TYPE OCTAL NUMBER (NO LEADING ZEROS) 
TYPE OCTAL NUMBER (AS PER LAST CALL) 
TYPE DECIMAL NUMBER oe hk SIGN) 


TTY FYPEIN CHARACTER ROUTINE 
N T 2) TTY TYPEIN STRING ROUTINE 
SSAVREG :CALL= SAVREG 3) SAVE RO-R5 ROUTINE 
SRESREG ; ; CALL=RESREG RESTORE RO-R5 ROUTINE 
- SBTTL POWER DOWN AND UP ROUTINE 
TTT TIT LITLLLL ttt t ttt iii iii iii iii iii iii iii. 
“ POWER DOWN ROUTINE 
SPWRDN: MOV #SILLUP, ates 7zSET FOR FAST UP 
#340 a4 C+2 ;;PRIO:7 
: PUSH RO ON STACK 


135374 : ;PUSH @SWR ON STACK 
000122 SP, $SAVR6 E SP 
043562 #SPWRUP ,a#PWRVEC” *LTSET UP VECTOR 


SSRSEKENSRRSS 


g 


owe 


; ; HANG 
ITITITTTTTTTITITI TILT IiL LLL LLL LLL 
012737 
016706 


005067 R6- iE LOOP FOR THE TTY 
005267 000066 : StWAIT FOR THE INC 
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CKKTBBO 11/44 

POWER DOWN AND UP ROUTINES SEQ 0112 
043604 001375 BNE 1$ 720F WORD 
ok ree 012677 135326 MOV (SP) +, aSWR ;7POP STACK INTO @SWR 
04361 012605 MOV (SP)+,R5 77POP STACK INTO R5 
043614 012604 MOV (SP) +,R4 ;7POP STACK INTO R4& 
043616 012603 MOV (SP)+,R3 7zPOP STACK INTO R3 
043620 012602 MOV (SP)+,R2 77POP STACK INTO R2 
043622 012601 (SP)+,R1 37POP STACK INTO R1 
043624 012600 MOV (SP)+,RO 77POP STACK INTO RO 
043626 012737 043510 000024 MOV #SPWRON ,AFPWRVEC ;;SET UP THE POWER DOWN VECTOR 
043634 012737 000340 000026 MOV #340 ,@MPWRVEC+2 ;;PRIO:7 
043642 104401 TYPE ;ZREPORT THE POWER FAILURE 
043644 043674 SPWRMG: .WORD PWRMSG sZPOWER FAIL MESSAGE POINTER 
043646 012716 MOV (PC) +, (SP) zZRESTART AT START 
043650 0 SPWRAD: .WORD START ZZRESTART ADDRESS 
043652 042766 000020 000002 BIC #20,2(SP) ::CLEAR ‘T’’ 
043660 005067 135424 CLR $TBIT 7:CLEAR THE ‘‘T’’ BIT FLAG 
043664 000002 RTI 
043666 000000 SILLUP: HALT 77 THE POWER UP SEQUENCE WAS STARTED 
043670 000776 BR 72 32; BEFORE THE POWER DOWN WAS COMPLETE 
043672 000000 $SAVR6: O ;zPUT THE SP HERE 

4006 043674 012 015 040 SG: .ASCIZ <12><15>? POWER FAILURE - RESTARTING ?<12><15> 

043677 120 117 127 
043702 105 122 040 
043705 106 101 111 
043710 114 «125 ~—‘122 
043713 105 040 055 
043716 040 122 105 
043721 123 124 101 
043724 122 124 1117 
043727 116 107 040 
043732 012 015 000 


4007 -EVEN 
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MESSAGES, DATA HEADERS-TABLES & FORMATS SEQ 01135 
4009 -SBTTL ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS 
4010 »NLIST BEX 
4011 oh Te 125 116 105 EM: eASCIZ /UNEXPECTED CPU TRAP TO LOC. 004/ 
rth 043776 125 116 105 ; -ASCIZ /UNEXPECTED MEM. MGMT. TRAP TO LOC. 250/ 
4013 044045 115 105 115 €—M10: .ASCIZ CCESS ABORT DID NOT OCCUR/ 
4014 044115 101 103 103 E—M11: .ASCIZ /ACCESS ERROR DID NOT ABORT INST ION/ 
4015 044164 123 122 060 EMI2: .ASCIZ T REPORT ACCESS ERROR CORRECTLY/ 
4016 044236 123 122 062 EM135:  .ASCIZ /SR2 DID NOT LOCKUP CORRECT VIRTUAL ADDR./ 
4017 044307 120 101 107 —€M14: .ASCIZ /PAGE LGTH. ABORT OCCURRED WHEN IT SHOULDN'T HAVE/ 
4018 044370 120 101 107 EM15: .ASCIZ pan LGTH. ABORT T OCCUR T SHOULD HAVE/ 
4019 044453 123 122 060 EM16: .ASCIZ DID NOT REPORT PAGE LGTH. ABORT CORRECTLY/ 
4020 044531 123 122 060 EM21: .ASCIZ /SRO OR SR2 CHANGED BY A SEC‘ ABORT / 
4021 044576 123 122 060 EM22: .ASCIZ /SRO OR SR2 WERE NOT ‘RESET’’ BY A RESET/ 
4022 044645 123 122 062 EM23: .ASCIZ /SR2 NOT TRACKING CORRECTLY/ 
4023 044700 104 111 104 EM24: .ASCIZ /DID NOT TRAP THRU KERNEL SPACE/ 
4024 044737 113 124 040 EM25: .ASCIZ /KT ERROR SERVICED ON ODD ADDR. ERROR/ 
4025 045004 123 122 060 EM26: .ASCIZ /SRO D D ADDR. ER 
26 04505 105 122 122 EM27: .ASCIZ /E NG EE (KT & ODD ADDR.)/ 
4027 045127 115 106 120 EM30: .ASCIZ PI INSTRUCT D WRONG DATA/ 
4028 04517 115 124 120 EM31: .ASCIZ /MTPI INSTRUCTION LOADED WRONG DATA/ 
4029 045235 123 124 101 EM32: .ASCIZ /STACK NOT PUSHED BY MFPI-MTPI/ 
4030 045273 113 105 122 €M33: .ASCIZ a. PAGE ACCESS INSTEAD OF USER: MFPI-MTPI/ 
4031 045351 115 056 115 EM34: ~=«.ASCIZ T_ IN _KERNAL D-SPACE HAD WRONG CONDITION/ 
0454 111 114 114 €EM35: .ASCIZ TTLLEGAL MODE 10 NOT ABORTED/ 
4033 045466 123 122 060 EM36:  .ASCIZ /SRO DID NOT REPORT ILLEGAL ~_*. oF CORRECTLY/ 
4034 045543 120 123 127 EM37:  .ASCIZ /PSW CHANGED BY AN RTI _IN USER 
04 101 102 117 EM40: .ASCIZ /ABORT I KERNAL D-SPACE PIC s te VECTOR FROM I=SPACE/ 
4036 045673 104 040 123 EM41: .ASCIZ /D SPACE ENABLE CIRCUITRY HAS FAILED/ 
4037 045737 111 116 103 EM42: .ASCIZ /INCORRECT STORE BY MTP INSTRUCT ION/ 
4038 046002 124 122 111 EM43: .ASCIZ /TRIED TO REFERENCE NON-RESIDENT ne 
4039 046047 127 122 117 EM44:  .ASCIZ /WRONG DATA FETCHED BY MFP_INSTRUCTION 
4040 046115 111 114 114 EM45: .ASCIZ /ILLEGAL CSM DID NOT TRAP TO 10/ 
4041 046154 103 123 115 EM46: .ASCIZ /CSM DID NOT ENTER SUPERVISOR MODE/ 
4042 046216 103 123 115 EM47: .ASCIZ /CSM SET UP WRONG PREVIOUS MODE/ 
4043 046255 103 123 115 EMSO: .ASCIZ /CSM SET UP STACK WRONG/ 
4044 046304 103 123 115 EM51: .ASCIZ /CSM PUSHED INCORRECT ARGUMENT/ 
4045 046342 103 123 115 EMS2: .ASCIZ /CSM PUSHED WRONG PC/ 
4046 046366 103 123 115 —M53:  .ASCIZ /CSM DID NOT CLEAR OLD PSW BITS <3:0>/ 
4047 046433 103 123 115 —M54: .ASCIZ /CSM ACCESSED WRONG SUPERVISOR tere 
rrr 046477 103 123 115 EMSS: a /CSM ABORTED WHEN IT SHOULD NOT HAVE/ 
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ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS SEQ 0114 


4051 046544 
prt 046624 
4053 046714 
4054 046754 

5 047034 


—— 
NN 


ERRORPC/ 
TESTNO ERRORPC/ 


NEE 


3 


4056 047114 ERRORPC/ 
4057 047174 
4058 047 


—— 
Ooooo 
rornrenr 


XPECTD TES £ RRORPC/ 
KIPDR4 SR2 WAS EXPECTD TESTNO ERRORPC/ 

(32. Was EXPECTD TESTNO ERRORPC/ 
/FIRST ABORT E COND 


— 
Nm 
Nm 


ERRORPC/ 


Mmnn — 
Wwron— 
— — 
BVEE 
a | 


ORPC 
RECEIVED/<CRLF > 
SRO WAS SR2 WAS TESTNO ERRORPC/ 


ee ce ce a a a ee ee ce ce ed oe ee ed ed ed 
SNS 
N 


SARUNRSAUNEWRRRRAAS 
4 3 3 9 — 


mr 
NO 


/SR SR 
EXPECTED: /<CRLF> 
/PSid PC SRO SR2/<CRLF > 
4170017 (3844) 020147 (3$)/<CRLF> 
/RECEIVED: /<CRLF> 
/PSW PC SRO SR2 TESTNO ERRORPC/ 
DATA/<CRLF > 
RECEIVD TESTNO ERR PC SUB CALL/ 
SUB _CALL/ 


& 
N 
— = 


Mr 
on 
& 


ONO 
—WUINW 
aad cd aad ed od 
PVSF 
Nw 


Nm 
w 


ee ed ee ed eed eed 
RSS 
Ruy 


_ 
~ 
w 


ERRORPC/ 
TESTNO ERRORPC EXPECTING 020031/ 
ERRORPC/ 


3 


RRORPC/ 
ERRORPC At ae XXX340/ 
/ERROR TOI-D VIRTUAL/<CRL 
/REGISTR REGISTR ADDRESS TESTNO > AT ABORT/ 
/GDDATA STORED TESTNO ERRORPC/ 
/(MMARO) (MARI) (MAR2) TESTNO ERRORPC/ 


JEXPECTD (PSW) TESTNO ERRORPC SUB CALL/ 
/OLDPSW TESTNO ERRORPC/ 


SARSNSAUVNANAS 


1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 
1 


ed ad ad ed ed ed ed od 
RVSRSN 
OuUeENWAN 


_ 
* 
m ao ao aa a AQAAOOOANY AAO 
PNG RG NDING ss BG NGG NING INN rt Bg ee ee ee BS eB BI III 


4085 051067 
4086 
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ERROR MESSAGES, DATA HEADERS-TABLES & FORMATS SEQ 0115 


4088 O31i¢0 
4089 0511 

4090 051156 
4091 051170 
4092 051206 
051224 
4094 051242 


TRAPPC , TRAPPS ,WASR6, CPUERR , TESTNO, SERRPC 0 
SRO ,WASSR2, TESTNO, SERRPC ,0 


 SERRPC 
$TMPO, TESTNO, SERRPC 0 
TMPO. TESTNO, SERRPC .0 
, TESTNO, SERAPC ,0 


0 
TESTNO, SERRPC .0 
RE TESTNO, SERRPC .0 
SRO, WASSR2, TESTNO, SERRPC ,0 


° 


SeBSS 
PEST RSS 


~ 
¥ 


S8888S88888S88Ss8Ssssssssssssss 


SESSSSSSSSSSSSSS990008998 


ENUANNNSO 


Sse33e3 
PRYSRPREE HI 


SSSSSSsssssss3sss3s3s3s 
PUP PV PVP PUPP PVIVIV IIA DAA 


ataiadtiuwtatw@a@dadandtabad dababadadadad 
geN 
mon 


¥ 
S 
S8S8888S8SS8SS8sSssssssssss 


wi 
wi 
No 
w 
& 


RRPC, 

WASSRO ,WASSR2 , TESTNO, SERRPC ,0 
$REG1, SREG3 ,WASSRO ,WASSR2, TESTNO, SERRPC ,0 
SREGS ,STMP4 , TESTNO, SERRPC ,SRCALL ,0 


SERRPC, SRCALL,O 
G2 , TESTNO, SERRPC ,0 
 TESTNO, SERRPC 0 


SERRPC 0 
WASSR2, TESTNO,BADPC ,0 
STNO, SERRPC ,0 

$REG1 .$REG2, TESTNO, $ERRPC ,0 
WASSRO,WASSR1 ,WASSR2, TESTNO, SERRPC ,0 
$REG3,$TMP4, TESTNO, SERRPC , SRCALL ,0 
$REGO.$REG1. TESTNO, SERRPC , SRCALL .O 
$TMP4 .$REG1. TESTNO, SERRPC .SRCALL .O 


S¥ 
SVRFHSTTRE 
VRFS 


SER RS 
TESPLRETE 
VEBss 


8 


z 
SS8888SS8S8Ss3ssssssssssssss 


BREESE S 
at od od od ed ed 


wii 
_ 
o 


& 


—_ = 
RR 
MNP — MW — NNN 


> S 

Tt — —fnnN- 
RRR 

at SS 
SELSSESREFEF 


3S 


mk kkk ed ed td ed ot od ot ot Sh = tt ot I = 


RANASSELESRALLS 
es os es SS et Ss SS SS oS os SS SS SS SS SS So ss 


= 
att 
2S 
os 
——y 
an 
NO 
RE 
i 


8 
' 
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4 
4 
4 
4 
4 
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BEX 


-EVEN 
-LIST 


- END 


000001 


SEQ 0117 


= 


NMmWwYron;r 


SELESRAS 


nhnnnnnnnnnnnnnnnnnnnnnnnn 
oOo 


8338 
sbicts 


Goh oUnaniee 


KSP 

LCNT 

LF 

LOOP 

MGMERR 002466 
MGMFLG 002470 
MRO fhe 16 


: 


me 


nnnunnnnnnnnnn 


es: 


HAHA 


ee se be ne Be a bs bs ss bs hs hh he 


ODwwoow 
ab ah abababad ad 
MEW -O 


z 
SESSE 


a 
3 


—_ 
NUE 
SNFGR 


EERE 
: 


— 
ERees 
SSUS=S8S 
Ww 
— 
MONO 


W 


CMSG 
CNTRLC 0415 


Ww 

— 
Ww 
Ww 


Ww 
Oo 
Mm 
rmron 
Ww 


11 
20 
360 
364 
366 
70 
2372 
2374 
2376 
320 
2322 


possatass oO 
MMA MAI 
ee 
Sane 
RSSRSERSO 

lw 
WRN 

o~ 


20 
ww 


> 
es a a st ot ss os ss Ss 4s 2 


SRS 
g 
Se 


R7 %000007 
SAVREG= 104413 
SCOPE = 000004 


WEEHKHKHLSOSW 
ALMOOLNOS 


MMNMNMNMNNINNIN —NNNNNN 


RRRRRERRRREKKKE 
NNNNNNNNNN 


KIPDR1= 


oO 
™m 
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SYMBOL TABLE SEQ 0118 


SCNTLC 


S238 
agegegerene 
SERTSSSEN 


ALEMNOCO 


03 
00 
00 
04 
00 
00 
00 
00 
00 
00 
0012 
04 
0011 
00 
00 
0011 
03 
06 


R 
Ss 
RRSE 


3 


ggese 


SSSERSSSRS 
gS 


Seanad BeeeOReReee 
ESKRRRESSASRS 
genrese 

BoRaRVEW 


Ww 
™m 
oO 
HSMNONFESALSOASUINEMN 


SERPRESLERRERSE 


SVE 
RESSLR 


eee 
g 
Z 


S 
$2 
S 


L 
SNWTST= 
SOCNT 


— 


FER 


Ss 
e 


177662 


R 
nm 
~N 
Vv 
Oo 
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SYMBOL TABLE 


STYPEC 042072 $TYPON SUNITM 000214 $XTSTR 037620 
STYPEX be 5846 aaat $SUSWR 001250 $$GET4= 000001 


000000 001 
ERRORS DETECTED: 0 


VIRTUAL MEMORY USED: 51968 WORDS ( 203 PAGES) 

DYNAMIC MEMORY: 20224 WORDS ( 77 PAGES) 

ELAPSED TIME: 00:05:35 

CKK TBB.BIN, CKKTBB. SEQ/CR/-SP=CKKTBBO.MLB/ML ,CKKTBBO.P11 


SOFILL 042757 
-$X = 000204 


SEQ 0119 





